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• 0 aniversario da SEI. comemorado 
no mes de outubro, certamente trou- 
xe algum esclarecimento no tocante 
a certos aspectos da Politica de Infor- 
matica. Na ocasiao, segundo o Secre- 
tdrio de Informatica Joubert de Oli- 
veira Brizida, passaram-se em revista 
quatro anos de atuagao. 

E la estavam os Generais Danilo 
Venturini e Octavio Medeiros. A pre- 
senga dos dois Ministros de Estado 
na comemoragao demonstra o forte 
apoio que vem sendo dado ao setor, 
alem de sugerir maior tranquilidade 
aos que vem se inquietando no que 
diz respeito a manutengao da reserva 
de mercado para a area de minis e 
microcomputadores. 

Tambdm a participagao do sena- 
dor Marco Maciel, na ocasiao home- 
nageado como “amigo da SET, nos 
faz lembrar a realizagao do Simpo- 
sio de informatica no Sen ado Fe- 
deral, quando a Politica desenvolvida 
pelo Governo obteve franco apoio dos 
partidos politicos, de uma maneira 
geral. 

A Politica de Informdtica, alias, 
vem desempenhando urn importante 
papel no momento, como elemento 



de uniao dos mais diversos interesses 
e setores produtivos de nossa socie- 
dade. Virou uma especie de compro- 
misso. Tanto se falou e demonstrou, 
de forma explicita ou nao, que sua 
linha seria mantida, que ela pode, 
hoje, ser vista como urn ponto de 
honra. 

• O Secretario de Informatica reco- 
nhece que “a Nagao brasileira da ir- 
refutaveis provas de que esta adequa- 
damente preparada para decidir so- 
bre os rumos da informatizagao de 
nossa sociedade". 

O senador Maciel esta certo de 
que o Pais ha de assegurar “o seu 
desenvolvimento auto-sustentado, (...) 
trilhando o caminho da capacitagao 
cientifica e tecnoldgica". 

O Ministro Danilo Venturini alerta 
que “se nao madrugarmos para a era 
da Informatica. corremos o risco de 
nao deixarmos para os que vem de- 
pots urn Brasil atualizado". E cha- 
ma amda atengao para o essencial 
papel a ser exercido pela comunida- 
de academica neste processo ao nao 
aceitar que “sem a pesquisa e capa- 
cidade criativa dos laboratdrios das 
Universidades se possa chegar a co- 



locar o computador a servigo do ho- 
mem". 

• E um compromisso. Garantido por 
todos que o tern assumido, na defesa 
de uma Politica que busque o estudo, 
absorgao, capacitagao e desenvolvi- 
mento tecnologico dentro de nosso 
Pais. Garantido principalmente, lem- 
bra Jose Maria Teixeira Sobrinho, Pre- 
sidente da Assespro Nacional, pela 
comunidade, “que d quern da forga 
ao modelo". 

A reserva de mercado e apenas 
um aspecto desta tentativa nacional 
de capacitagao tecnoldgica, e tam- 
bem esta garantida, temporariamente, 
dizem as autoridades, ate que nossa 
industria esteja madura o suficiente 
para alcangar niveis competitivos de 
produtividade. Segue-se agora o pe- 
riodo de discussao democratica em 
torno dos parametros que definirao 
tal ponto de maturidade. 

• E nao havendo muito mais o que 
especular acerca de uma Politica ia 
tao definida, convido os leitores para 
o espetaculo que MS traz neste nu- 
mero: consultas ao I Ching e aos 
astros; previsoes e truques de ma- 
gica. Boa leitura. 
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Enxadrista experiente, Luciano Nilo de An- 
drade jA escreveu para os jornais "Correio da 
Manha". " Data News" e "Ultima Hora" e pa- 
ra a revista "Fatos & Fotos". Luciano 6 econo- 
mista, trabalhando no MinistArio da Fazenda, 
no Rio de Janeiro. As opinioes e comentArios 
de Luciano Nilo de Andrade, bem como as 
ultimas novidades do Xadrez jogado por com- 
putadores, estarSo sempre presen tes em 
MICRO SISTEMAS. 



Micro empata com 
o campeao mundial 



xtraordinbrio resuitado conse- 
guiu o Mephisto III, novo mi- 

cro jb disponfvel no exterior, 

ao empatar com Anatoly Karpov, cam- 
peao mundial. Esta faganha ocorreu em 
Munique, no dia 1 de setembro de 1983, 
por ocasiao de uma simultanea dada 
nessa cidade contra 20 jogadores e um 
micro. 

£ verdade que o fator sorte, a favor 
do micro, livrou-o da derrota certa 
quando da jogada 20 — B4D(?). Tivesse 
Karpov jogkio 20 — P4CR, o desfecho 
seria outro. 

A partida que teve esse singular resui- 
tado, a seguir reproduzida, foi realizada 
segundo o procedimento usual das simul- 
taneas. Isto b, as jogadas do Mephisto III 
eram feitas sempre que o simultanista 
passava defronte de seu tabuleiro. Com 
esta finalidade, era entSo pressionada a 
tecla INTERRUPT para que a resposta 
fosse indicada, mesmo que o micro ain- 
da estivesse pensando. £ provbvel que, 
se Ihe fosse permitido utilizar seu tempo 
normal, as jogadas tivessem sido melho- 
res. 0 resuitado final obtido pelo simul- 
tanista foi de 19 vitbrias e dois empates. 

Karpov x Mephisto 
Simultanea, Munique, 1/9/1983 
Ruy Lopez — Defesa Berlinense 

1 - P4R P4R; 2 - C38R C3BD; 
3 — B5C C3B; 4-0-0 CxP; 5 — P4D 



PxP. As pretas jogam uma defesa 
utilizada com frequencia atb o infciodo 
sbculo, hoje considerada inferior; a 
captura do peao, em vez d e 5 — . . . 
B2R, deixarb as pretas vulnerbveis a um 
ataque frontal. 6 — T1R P4B; 7 — CxP 
CxC; 8 — DxC. A pressao das brancas jb 
b sensfvel. Elas ameagam capturar o 
cavalo com P3BR. 8 — . . . R2B; 9 

- B4B+ P4D; 10 - BxP+ B3R; 11 

- BxB+ RxB. Parece que as pretas ten- 
tarn induzir as brancas a arriscar a 
captura do cavalo com sequencia 12 — 
DxD TxD; 13 - P3B B4B+; 14 - RIB. 
B7B; 15 - PxC BxT; 16 - PxP+ RxP; 

17 - RxB T (IT) iR+; 18 - R2B T1D, 
com compensagoes pelo material per- 
dido. 12 - TxC+ PxT; 13 - DxP+ 
R3B; 14 - C3B forgado 14 - . . . P3B; 
15 - B3R B2R; 16 -T1R D2D; 17 - 
D4B+ R3C. Se 17 - . . . D4B, entao 18 

- B4D + R3C; 19 - DxD RxD; 20 - 
TxD, com vantagem material ganhadora. 

18 — P4TR — Karpov continua asse- 
diando o rei negro. O objetivo b entregar 
o peao com 19 — P5T+ RxP; 20 — 
D7B+ P3CR; 21 — B4B com muitas 
ameagas. Se 21 — . . . TD1B, entao 22 — 
T5R+ R5C; 23 - P3B+ R5T; 24 - 
P3CR+ R6T; 25 - T5T+ PxT; 26 

- DxP+ B5T; 27 - DxB mate ! 18 

- . . .D4B oferecendo a troca de damas. 
Tambbm era possfvel B3B. 19 — P5T+ 
DxP; 20 — B4D(?). O correto seria 20 — 
P4CR\ D4T, mas precisam evitar D5B 



mate; 21 - P4CD\ BxP;22 - B6C\ PxB; 
23 - T6R mate\ 20 - . . . B6B; 21 - 
P4CR D4CR; 22 — D4R+ R2B e Karpov 
optou pelo empate com repetigoes de 
jogadas por nao ver razao para conti- 
nuar. Um empate tornado sucesso para 
o Mephisto III: 23 - D6R + R2B; 24- 
D4R+ R2B; 25 — D7B+ empate. 

O Mephisto III 

O Mephisto ill, aparelho alemao, b 
vendido em Londres por £ 260,00, 
mercado onde os pregos sao notoria- 
mente mais elevados que os de Nova 
lorque. Ele b uma versao melhorada do 
Mephisto II, mantendo, por 6m, a mesma 
aparencia. O programa do Mephisto III 
tern 32Kb, enquanto o do Mephisto II 
tern 16Kb. 

Segundo avaliagbo do seu fabricante, 
o Mephisto III 6 o melhor micro da 
atualidade. A facilidade de comprb-lo 
sem o tabuleiro sensorizado torna seu 
prego bem menor que o de outros mi- 
cros de sua categoria, como por exem- 
plo, o Prestige (£ 880,00) ou o Elite 
(£370,00). 

Ainda segundo seu fabricante, ele 6 
capaz de analisar 19 jogadas (9 de seu 
adversbrio e 10 suas) quando ocorrerem 
capturas ou xeques. Prevb 10 a 15 joga- 
das na fase de meio e sua forga avaliada 
6 de ELO 2000. 
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£ capaz de jogadas vivas e elaborados 
recursos estratbgicos. tanto no ataque 
quanto na defesa. Estb alerta para ava- 
liar o valor da estrutura de pedes antes e 
depois do toque, bem como o conceito 
de peao passado e do peao isolado. 

Promove o peao na pega que julgar 
melhor, avalia a posigao e a profundida- 



de de sua anblise — o que permitirb ao 
jogador melhorar seu jogo — e ainda dis- 
poe de. aproximadamente. 500 linhas de 
aberturas e suas transposigoes! 

£ admir£vel a lista de coisas que pro- 
mete fazer. So futuras atuagoes do 
Mephisto III permitirao separar a ufania 
da realidade. 




Oiagrama A - Posigao depois de 13 - DxP+. 
Karpov entregou a qualidade para despir o rei 
negro de suas defesas. Nesta altura. a vide do 
rei negro vale muito pouco. 

r 




Oiagrama B - Posigao depots de 19 - P5T ♦ 
DxP. As pretas estariam perdidas depois de 
20 — P4CRI. Karpov cochilou a as pretas 
arrancaram um empate. 



PONHA ESTE NOME 
NA MEM0RIA 




k ★ 
k ★ 
★ 

D* 

★ 

★ ★ 



•Computadores e perifOricos com os 
melhores pregos 

•Garantia de 1 ano e cursos gratuitos 

•Software aplicativo para computadores 
da llnha APPLE e TRS-80 

•Automagdo de clinlcas. escntbrios. 
motbis. controle de produgflo, etc.. 



RuaOf*lia. 248 - Fonaa: 211-4281 a 212-4527. 




Impressora 
Matricial 
Elgin Lady 



Velocidade de impressao 100 cps 
132colunasa lOcpi 







ELETRDNICA 



A impressora Elgin Lady 6 o novo padrSo para aplicagoes profissionais 
em seu computador pessoal ou microcomputador. 

Com velocidade de 100 CPS, os caracteres impresses em matriz de pontos 
no formato 9 x 7, sao de alta resoiupdo. Com capacidade de 132 colunas, 
com porta at6 264 caracteres/ linha. 

Atravbs de uma tecia, em modo conversacional, 18 fungfies s3o disponfveis 

para completa defmigdo do formato de impress3o, 

entre as quais 11 fungdes podem ser programadas via software. 

Com o mddulo Bgingraph, a impressora Elgin Lady 
constitui a melhor escolha para seu microcomputador, 
em aplicapdes que requerem total flexibilidade grbfica 
atravbs de caracteres semi-grbficos ou fungdes grdficas 
com enderegamento a nlvel de agulhas. 

As interfaces, intercambibveis a nlvel de operador, 
capacitam a Bgin Lady a uma sbrie de diferentes conexoes 
com a maioria dos microcomputadores 
e sistemas disponiveis no mercado. 



SouSvt? 



I 2201611 

Tele* (OH) 37805 ELO B« 
PAtyca M09 cut Ovzei S^, 

» ABiCOWP 




Connie* • nova 



S4o Paulo 
2707566 • i 



I) • COW PU SHOP ■ 212 9004 • COMPUTERLAND - 231-3277 . COMPUTlOUE 231 3922 • COMPUTE 231 1173 . COPEC 678369 • EQUIP* 
S 681-0200 • SERVIMEC 222-151 1 • MICROS HOP 282 2105 • OPT INFORMATICA 280-2966 • SACCO - 814^596 • TIGER 212-95 22 

32-6322 • Rio do Janoiro (RJ) • ClAPPY 253 3395 • COMPUTlOUE 267 1093 • TECNITRQN • 23^9670 • B«lo HorUonle 
Monies Clsros (MG) • LOGO INFORmAtiCA • 221 2599 . Porto Alogrs (RS) • ADVANCING 28 1 194 . COMPUMiOlA 22-5061 
BrasIKB • COVPUSMOW 273-2128 
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Verbatim 



ENTREGA IMEDIATA 



Dalalife 100% livre dc err os 



DE MANAUS PARA A MEMPHIS 



PRODUZIDO NA 
ZONA FRANCA DE MANAUS 

signifies: qualidade com 5 anos de garantia 
e o melhor prego do mercado. 



Revendedores c fabricantes interessados: 
Tel: (Oil) 262-5332 



A Clappy apresenta 
o microcomputador 
com macrosolucoes. 



O Unltron da Clappy. AP II com 64 k de memorla, placa CP/M, 
exaustor, 2 drives, monitor de fdsforo verde e lmpressora Elebra 8010 P de 100 cps.660 ORTJN's 



E o AP II da Unltron. A solugao 
perfeita para as pequenas, medias 
e grandes empresas, profissionais 
liberals e o dia-a-dia do lar. 
Solugao naa grandes empresas 
— 0 AP II pode ser utilizado no 
gerenclamento de departamentos, 
em orgamentos, PERT, provisoes 
de vendas e no mals que voce 
precisar ou prever. 

Solugao para o prof lssional 
liberal — 0 AP II da Unltron 
tambem foi criado sob medida 
para as necessidades de qualquer 
professional liberal. No caso do 
medico e do advogado, por 
exemplo, ele faz o cadastro dos 
clientes, emissao de laudas, 
controle de medlcamentos, 
controle de processos, cobran gas 
judicials e juridicas. 



Solugao no escrltorio — 0 AP II 

faz tudo para minimizar e facilitar 
o seu trabalho: contabilidade, 
folha de pagamento, orgamentos, 
controle de estoque, contas a 
pagar e a receber com muito mais 
rapidez e eflciencia. 

Solugao em condominlos — 

0 AP II facilita ainda a vidano 
condominio: naadministragao do 
orgamento, controle de cobrangas 
e pagamentos, balancetes, folha de 
pagamento, controle de entrada e 
saida de visitantes, flcha de 
moradores. 

Solngao no prego — 

Na Clappy, voce encontra oAPII 
pelo menor prego da praga e com 
macrosolugoes de pagamento. 



unitfon IggfiClgBV 



COPACARAKA 

Aberta diariamente das 10 as 20 horas 
e aos sabados das 10 as 15 boras. 



1 Venha a nossa loja ou soliclte a vlslta de um 
representante. 

Centro: Av. Rio Branco, 12 - loja e sobreloja. 
Centro: Rua Sete de Setembro. 88 - loja Q 
(galerla). 

Copa cabana: Rua Pompeu Lourelro, 99. 

Sao Crlatdvao: Rua An tunes Maciel,25 - 
2.° andar. 

Tels.: (021) 222-55 1 7 e 234-02 14 # 264-2096 
• 253-3395 • 222-5721 • 257-4398 • 
253-3170 # 236-7175 • 283-3588 
Entregamos em todo o Brasil pelo reembolso Varlg. 



FD 34-9.000 


Simples face/simples densidade 
26 selores 

128 bytes/sector. 8polegadas 


FD 34-8.000 


Simples face/dupla densidade. 
Nao selorizado - nao formatado 
8 polegadas 


DD 34-4001 


Dupla face/dupla densidade. 
Nao selorizado - nao formatado 
8 polegadas 


MD 525-01 


Simples face/dupla 

densidade 40 trilhas 5 1/4 polegadas 


MD 550-01 


Dupla face/dupla 

densidade 40 Irilhas 5 1/4 polegadas 



DA MEMPHIS PARA TODO O BRASIL 












O sorteado deste mes, que receberd 
gratuitamente uma assinatura de um 
ano de MICRO SISTEMAS, 6 Luiz 
Ant&nio de Oliveira, de Goi5s. 

( CQPIGO de cores 

Como todo hobbysta sinto dificul- 
dades em memorizar o cbdigo de co- 
res de resistores e capacitores. Por isso 
gostaria de dar tres sugestSes: a primei- 
ra seria um programa que descobrisse 
o valor do resistor dando entrada no 
micro s6 com o cSdigo de cores. 

A segunda seria o mesmo programa, 
s6 que para capacitores de pollster. E 
a terceira seria que voc£s da revista fi- 
zessem uma coluna mensal ou bimen- 
sal com aparelhos para os micros TK e 
NE com as fotos dos chapeados e de 
como ficou a dita montagem adaptada 
ao micro. Uma observagao final: os 
programas seriam para os micros corn- 
pat I've is com o ZX81. 

Alexandre C. Machado. 

Rio de Janeiro-RJ 



Fica aqui a sugestao para que os lei- 
tores se mobilizem. 




Em atengao ao artigo publicado no 
mes de julho/83, intitulado "No Mun- 
do das Impressoras", vimos por meio 
desta solicitar a inclusSo dos itens a 
seguir discriminados: 

1 — Modelo 

• EL-8001 

• EL-8002 

2 — Impressao Bidirecional 

• Nao (EL-8001) 

• Opcional (EL-8002) 

3 — Densidade Vertical 

• 3ou6 LPI (EL-8001) 

• 3ou 6 LPI (EL-8002) 

4 — Conjunto de Caracteres 

4.1 — Descrigao 



• 96 ASCII albm do texto 
restante (EL-8001) 

• 96 ASCII al6m do texto 
restante (EL-8002) 

4.2 — Carter Expandido 

• Sim (EL-8001) 

• Sim (EL-8002) 

4.3 — Carter Comprimido 

• • Nao (EL-8001) 

• Sim (EL-8002) 

5 — Numero de Copias 

• 1 + 5 (EL-8001) 

• 1+5 (EL-8002) 

6 — Prego 

6.1 - EL-8001 e EL-8002 com buf- 

fer de 128 caracteres: 225,42 
ORTN's 

6.2 - EL-8001 e EL-8002 com buf- 

fer de 2 K caracteres: 237,44 
ORTN's 

6.3 — EL-8002 (somente) na versao 

bidirecional: acr^scimo de 30 
ORTN's no prego anterior. 

Benildo Pieroni 

Gerente de Vendas da Ecodata - RJ 

£ com muita satisfagao que, atraves 
desta, vimos agradecer a inclusao de 
nossas impressoras no quadro publica- 
dro publicado nas p^ginas 44 e 45 de 
MICRO SISTEMAS, de julho de 83. 
Gostari'amos, entretanto, de solicitar 
alguns reparos nas informagdes ali con- 
tidas: 

1 — Sobre a El 6010 (Monica) 

• Tern capacidade gr^fica; expansao 
de buffer ate 8 K; caracteres compri- 
midos em toda linha, nao se limitando 
a 16 caracteres; possui interface 
RS232-C; e tern capacidade para near- 
letter-quality. 

2 - Sobre a El 9050 

• So tern velocidades de transmissao 
acima de 1200 BPS. 

Jos6 Mauri'cio S. Mendes 
Elebra Inform^tica — SP 

Agradecemos as corregoes e pedi- 
mos desculpas por nossa falha. 




Ha muito tempo venho tentando 
encontrar no combrcio local revistas 
ou informes na area de processamento 
de dados que atrafam minha atengao. 



De todas as revistas que tive oportuni- 
dade de verificar, a MICRO SISTE- 
MAS foi a mais interessante, tanto nos 
dados, informes, quanto nos cursos. 

Adelardo G. Mesquita Neto 
Fortaleza — CE 

Tenho acompanhado o trabalho de 
voces a partir dos primeiros numeros 
de MS e, com satisfagao, pude consta- 
tar nao sS a preservagao da qualidade 
alcangada como tamb^m um aprimo- 
ramento constante. 

Roberto Z. Ognibene 
Sao Paulo-SP 

En reciente visita a Sao Paulo he ad- 
quirido un ejemplar de la revista MI- 
CRO SISTEMAS, la cual me ha gusta- 
do mucho ya que poseo un micro 
ZX81, 16 K y por ac3 en nuestro pai's 
la informaciSn acerca de microcompu- 
tadores es escasfsima. 

Dr. Hermann A. Muhlhauser 
Santiago-Chile 




Sou leitor assfduo desta revista des- 
de o seu langamento, e reconhegoque 
ela tern colaborado para o aprimora- 
mento de muitos profissionais ligados 
a Processamento de Dados. 

Pordm devo fazer uma s^ria cri'tica: 
tenho notado que voces supervalori- 
zam o BASIC — da primeira & ultima 
pagina da revista - em detrimento de 
outras importantes linguagens. Como 
"programadores COBOL'', eu e v^rios 
colegas nos sentimos bastante discri- 
minados, pois praticamente nao se en- 
contra nada nesta revista que se refira 
a este importante e tao amplamente 
utilizado instrumento de programagao 



Luiz Antonio de Oliveira 
Goiania-GO 

Luiz, n6s tamb4m gostarfamos de 
receber mais colaboragSes tanto para 
esta importante linguagem como para 
outras. Alicis, aproveitamos este espago 
para "engrosser" o coro dos que pe- 
dem maior diversificagSo de linguagens 
para micros: ser£o bem-vindas. No que 
depender de n6s, ficaremos atentos. 
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Tenho 1 1 anos, sei BASIC e alguma 
coisa de an^lise de sistemas. Gostaria 
que publicassem alguns artigos para/so- 
bre programagao para criangas. Eu gos- 
taria tambdm que dessem algumas di- 
cas e/ou curiosidades sobre os micros 
(por exemplo: como gravar sons, ma- 
nipular cassetes etc.). Tamb^m adora- 
ria que fosse criado um Clube de Com- 
putagao com a lista de pessoas, telefo- 
nes, enderegos, equipamentos etc. para 
trocarmos programas. 

Marcus Y. Maranhao 
Bras flia-D F 

Gostaria que, na medida do possf- 
vel, voces abordassem mais a lingua- 
gem COBOL, principalmenteo COBOL 
Estruturado, pois acho que assim co- 
mo eu, existem muitas pessoas que es- 
tao sempre na expectativa de ver essa 
linguagem mais abordada nesta bela re- 
vista. 

Jos£ Guilherme P. dos Santos 
Sao Lui's-MA 

Em primeiro lugar queria parabeni- 
z^-los pelo excelente trabalho apresen- 
tado por esta revista, e tambdm pelo 
Curso de Assembler, ao qual venho 
acompanhando. 



Tenho uma sugestao a Ihes fazer: 
por que nao fazer o mesmo que fazem 
as revistas norte-americanas "80 Micro" 
e "Creative Computing", que todo mes 
de agosto langam uma edigao especial 
com 40 jogos? 

Celso Augusto R. de Oliveira 
Sao Paulo-SP 

Gostaria que esta revista desenvol- 
vesse mais artigos sobre rotinas em 
Assembler. 

Passei o programa "Aeroporto 83" 
para o meu TK85, que me ensinou so- 
bre o assunto muito mais que livros ou 
teorias em forma de artigo. ParaWns 
por esta magnffica revista, que 6 pr^ti- 
ca e fonte inesgot^vel de bibliografia 
sobre microcomputadores. 

Dr. Josb A. de Carvalho Neto 
Mogi Guagu-SP 

Acharia muito interessante se voces 
publicassem alguns artigos a respeito 
de mercados de trabalho em evolugao 
na 3rea de Inform^tica; novas aplica- 
goes do campo; e as pesquisas que es- 
tao sendo feitas, principalmente no 
Brasil, e que terao uma aplicagao pra- 
tica em poucos anos. Notem bem que 
n3o estou pedindo mat^rias versando 
sobre ficgaocienti'fica ou futurologia, 
pois vejo que esta nao e a filosofia des- 
ta revista, que se aplica em fazer um 



trabalho $£rio, pratico e eficiente. 

Josa Marcos Gomes 
Santo Andra-SP 

MS deveria abrir um canal de comu- 
nicagao com revistas estrangeiras, ou 
seja, simplesmente traduzir textos e 
programas similares aos micros brasi- 
leiros, criando assim um intercambio 
informatico. O ti'tulo da segao seria 
"Rede de Comunicagao". 

Dorgival da Cunha Silva 
S3o Paulo-SP 

Queria sugerir a voces uma reporta- 
gem sobre todos os micros existentes 
no mercado e seus detalhes como: pre- 
go, capacidade de membria, expan- 
sao, linguagem, modelo, fabricante, 
unidades vendidas at6 o momento etc. 

Gostaria tamWm de uma reporta- 
gem sobre a m3 formagSo de profis- 
sionais de Processamento de Dados em 
cursos livres, as dificuldades de conse- 
guir uma colocagao etc. 

Jamir L. dos Santos 
Goiania-GO 



Envie suas sugestSes para MICRO 
SISTEMAS. Elas serSo anotadas em 
nossa pauta e procuraremos, na me- 
dida do possfvel, viabiliz4-las. 



iH 



(• 



illlii 



As Mesas para Terminais H&M sao tao boas quanto o 
seu computador. Sabe por que? Porque elas sao feitas g 
com o mesmo know-how e o mesmo critbrio de 
controle, seguranqa e precisao, como sao feitos tambbm 
os computadores. 

AI6m disso, as Mesas para Terminais H&M possuem 
acabamento perfeito, fosfatizado e com fundo plaine. A 
base 6 de poliuretano na cor grafite e o painel na cor gelo. 
O tampo em todos os modelos 6 de madeira compensada 
de mogno ou virola, com revestimento de fdrmica fosca 
branca. 



Tudo isso com a qualidade, 
tecnologia e tradicao H&M que • 
^ vocS jci conhece, e que o seu 

computador estb esperando para 
conhecer. 

Consulte-nos pelo telefone ou solicite 
a visita de um representante H&M. 



XisPfCuiS PAR* Iinun* w o 4 ^. MIHlUnOHI 

\Sr uEMIO D , fo»uuL*nios c Representantes em todo o Brasil 



Filiada a 
ANFORSAI 
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Um programa que ca/cu/a e forma os hexagramas do / CHING 
nos micros TRS-80 mode/o III, substituindo o metodo das moedas 



Consulte o I CHING 



Luiz Gonzaga de Alvarenga 



I CHING e um livro de ordcu- 
los chines cuja origem se perde 
nos confins dos tempos. Ne- 
nhum historiador da China conseguiu 
estabelecer com precisao a dpoca em 
que foi escrito, nem quern o escreveu. 

Quern nao o conhece, pode pensar 
tratar-se apenas de um monte de supers- 
edes. Entretanto, o I CHING seduziu 
mentes tao brilhantes como Leibnitz, 
matemdtico alemao e descobridor, jun- 
tamente com Newton, do Calculo Infini- 
se baseou para elaborar 
b inaria; Herman Hesse, 
autor de obras conhecidissimas como O 
Lobo da Estepe, Demi an e 0 Jogo das 
Contas de Vidro, este ultimo inspirado 
no I CHENG; Carl Gustav Jung, psicana- 
lista suigo de renome, que criou a cha- 
mada Teoria da Sincronicidade com ba- 
se em seus estudos deste livro; e inume- 
ros pesquisadores mais ou menos famo- 
sos. 

Nao se pretende neste artigo fazer 
proselitismo da obra, pois partiremos do 
pressuposto que o leitor a conhega. 
Assim, saberd que 6 um livro de ordculos 
usado como orientagao, mais do que pa- 
ra advinhagao, para diversos momentos 
da vida. 

Tradicionalmente, sao usadas varetas 
de bambu, segundo um mdtodo rituali- 
zado, para se estabelecer os chamados 
hexagramas, que s3o figuras criadas por 
linhas inteiras e quebradas. No Ociden- 
te, este mdtodo foi simplificado pelo 
uso de moedas, em numero de tres, lan- 
gadas sucessivamente num total de seis 
vezes. 

A consulta aos hexagramas estampa- 
dos no livro, de acordo com uma ordem 
apropriada, leva a leitura de textos, co- 
mo jd foi dito, em forma de oraculos. 

0 programa mostrado a seguir subs- 
titui o metodo das moedas. Poder-se-ia 
cogitar da validade deste metodo, mas ja 
que o microcomputador estabelece se- 
quences aleatorias de numeros, pode-se 
dizer que nao ha diferenga entre o resul- 
tado deste metodo e o do langamento 
ao acaso de moedas. 
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tesimal, no qual 
uma aritmetica 




Calculo dos Hexagramas do I CHING 

5 G0SUB615 
10 M=i *N=1 
15 G0T035 

20 PR INT ollOib ,"< ENTER >"; 

25 FOR I=iT0100s NEXT SPRINT 31016," :FCRI =11 05U=NEX1 

30 GI=INKEYI:IFGI=""THEN20ELSERETURN 

35 CLS 
40 G=90i 

45 PR INT"QUER 1NGTRUC0ES? (S/N)"; 

50 I*=INKEYniFIl=""THEN5D 
55 IFIl="S"THENG0SUB500ELSECLSsG0 f 060 

60 CLS:PR iNT"FORMULE MENT ALMENTL A PLRGUNTA" s G0SU82U : CL5 
65 RANDOM! FOR 1=1 1 06 ! A< 1 )=RND (4 > 

7 0 S4=STRKA<I>> 

75 DKl)=MIDKSI,2) 

30 DI=DI+D4 ( I ) 

05 TI=D1 
90 NEXT 
95 Z=1 
100 L=1 

105 II M1DKDI ,L , 1 >="1"1 HENG01 0125 
110 II MIDK 04, L, 1 >="2"1HENI30 10135 
115 II Ml 04 (D4,L,i) ="3" I’HENGOI 0145 
i2U IFMIDK D4,L,1)="4"THENG0T0155 

125 PRINTolO, " "t 

130 M 104(01 , L , l )="i":G 0 64 :L=L ri = II L>6 I IIENi7ULL8LGOl 010.J 

135 PR lNTolb , " 

140 MIOKDKL, 1 >="U"!U=G 64iL“L+l : 11 L >6THEN1/ULLSEG0 1 0106 

145 PKlNTOb " u LEI A UlNHA II " ; L ; 

150 MID*U)l,E r l)="l":M=U!G-G-64:A(Z)?L!Z=Z^l!L-L+l = 1FL>6THEN17 
OELSEGO 1 0105 

155 PR1NT3G," X LEIA LINIIA H ' ;L; 

160 MIDKD4 ,L, 1 )="0" : N~Q : G~G 64 s A< Z)=L! Z=Z-i 1 sL=L+l t IFL>& THEN1/ 

OLSEGOT0105 

165 00T0105 

170 PRINT3518,"HEX 1","HEX 2"; 

175 PRINle)25,"I CHIN G"; 

180 PRlNT3i49,"0 LIVRO DAS MOTACOES"; 

185 G0SU820 
190 CLS 

195 IFM=00RN=0THEN225 
200 IFM=10RN=1 THEN2US 

205 PK1N1 "OS HEXAGRAMAS SAO 1GUA1S, PoRTANTO, NAO HA LINHAS LM 
M0rACA0.";!RH=l 

210 PRIN1 „ _ 

215 FR1NTSI76,"0 IILXAGRAMA IEM 0 NUMERO : " ; : PR INI 8268 , "AUUARDE 



220 G0TO235 

225 PR INI 364 , "OS HEXAGRAMAS TEM OS SLGUiNTL 3 NUMEROS: 

230 PR1NT3128, "LINHAS EM MUTACAO: ; : 0-6 ; FORS- l 1 06 - 1 = PR IN TA ( S ) 
; =NEXTS:PR INI 3260, AGUARDE . . . " ; 

235 FORR=1IOB:KORO=1T08 
240 READHKP ,0) 

245 II HI ( P , 0 ) -01 THENLETV=P = 8=0 
250 NEXT 0 : NLXTP 

255 DATA"11 1 ill", "111 100" ,"111010", "illUOl", "i 1 1 GOO" ,"111011", 
"illlUi", "111110" 

260 DA TA'-iOUl 11", "100100", "100010", "100001 ","100000"," 1000 11", 
" 100101 ", " 100110 " 

265 OA I A"010i 11" , "010100" , "0 1U010" ,"0l0001","U100U0","U10011" f 
"OiOlOi" , "QiUilO" 

270 OAI A"00i ill", "001 100", "001010", "001001" , "0C10UU" , "001 Oil", 
" 001101 ". " 001110 " 
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' 000010 ", " 000001 ' 
' 011010 ", " 011001 ' 
' 101010 ", " 101001 ' 
' 110010 ", " 110001 ' 



275 DAI A"OOQ 111", "000100" , "0000 1 0" , "000001 " , "000000 
"000101", "000110" 

28U DATA"0illli","01 il00","0ii010","011001","011000 
"011101", "011110" 

285 DAI A" 101 111", "1011 00", "101010", "101 001", "101000 
"101101", "101110" 

290 DATA"1 101 11", "110100", "110010", "11 0001", "110000 
"liOiOi'V'iioiio" 

295 F0RY=1 T08:F0RZ=1T08 
300 READJ4 ( Y , Z ) 

305 1FRH=1THEN310ELSE315 

310 IF J1(Y,Z)=J4(V,B) THENPR INT3106, JS( Y,Z> j S G0T0320 
315 IF 34 < Y ,Z)=J4(V,B ) THENPR I NT 3 106 ,JS(Y,Z) "e" • 

320 NEXTZ : NEXT Y 

325 UA I A" 1 " , "34" , "5" , "26" ,"11", "9" ,"14", "43" 

330 DA P A"25" , "51" , "3" , "27" , "24" , "42" , "21" , "17" 

335 DAT A"6" , "40" , "29" , "4" , "7" , "59" , "64" , "47" 

340 DAT A"33" , "62" , "39" , "52" , "15" , "53" , "56" , "31" 

345 DAI A 12", "16", "8", "23", "2", "20", "35", "45" 

350 UATA"44" , "32" , "48" , "18" , "46" , "57" , "50" , "28" 

355 DATA" 13" , "55" , "63" , "22" , "36" , "37", "30" , "49" 

360 DA f A" 10", "54", "60", "41", "19", "61", "38", "58" 



000000 ", " 000011 ", 
01 1000", "01 101 i", 
101000", "101011", 
110000" ,"110011", 



350 DATA"44" , "32" , "48" , "18" , "46" , "57' 
355 DATA" 13" , "55" , "63" , "22" , "36" , "37' 



360 DA f A" 10", "54", "60", "4 1", "19", "61", "38", "58" 

365 K“-i 

37u 1FMID4 ( 1 4 , K , 1 ) ="i"THENJ90 
375 IFMIDK 14 ,K , 1 ) ="2"THEN400 
380 IFMIDK T4,K , 1 ) ="3"T IIEN410 
305 IFMIDK 1 X , K , 1 ) ="4"TIIEN42U 
U9U MIDK T4 , K , 1 ) =" 1 " 

95 K=KH:IFK >6 fHEN43QELSEG0 T0370 
400 MIDK 1 4 ,K , 1 )="0" 

405 K=K< HII K >6 rilEN430LLSEG0T037u 
410 MID4U4,K,i>="0" 

415 K-K »1 ! IFK >6 ( I IEN430ELSEG0T0370 
420 MIDK T4,K , 1 >="1" 

425 K-K + i : IFK >6 I HEN4 J0LLJLG0T0370 
430 RESTORE. 

435 -FOR A =1 TOO - 1 0RX=1 TOO 
440 READH4 ( A , X) 

4 45 IFHKA,X)=T4THENLLI G~A:II=X 

450 NEXT X : NEXT A 

455 FORYY-l r08!F0RZZ=l 100 

:tU READJ1 < YY ,ZZ J 

465 1FKH--1 1 IIEN4/0ELSE4/5 

4/U II 34<YY,ZZ>=J4<G,H>1HENFR1N1811B,' " ; : PR INI 3268 ' 

" ; ! DO T 0 485 

475 1FJK YY,ZZ) =34 (G,H) THENPR IN T31 18,JKYY,ZZ>; :PR1N10268 " 

" ; : GO T0485 
400 NEXTZZ:NLXTYY 
405 G0SUB20 
490 CLS 
495 GO I 0645 

500 CLSsPRINT" 0 1 CHING e* um livro de oraculos proven ie 

nte da China, 

505 FRINT"euja or I gem se perde no passado. Normalmente, para s 
e usar o I " 

510 PRINT"CH1NG, usam-se varetas de bambu, ou mesmo moedas, pa 
•a se for mar" 

515 PRINl"um ou dois hexagramas, cujos content ar I os* sao entao 1 
I dos, junta-" 

520 PRINT"mente com as linhas em mutacao do primeiro hexagrama 
. 0 oraculo " 

525 PRlNT"comp leto compreendc os comentarios dos hexagramas e 
os das 1 i - " 

530 PRINT"nhas, cuja i nl erpret acao contpreende dois periodos de 
tempo, um " 

535 PRINT "ant er i or vpresenfce ou passado) e outro posterior <fu 
tur o) 

540 G0SUB20 

545 CLS:PR lNTiiJ24 , "Inst r ucoes Prel i m i nares" 

550 PR IN I 

555 PR INI "0 I CHING,-* sendo um livro de oraculos, e’ usado para 
ndivinha 

560 PRINI"coes. Para usa ' lo, deve se pensar sobre uma pergunt 
a a lhe ser" 

565 PRINT" I e 1 1 a lisio e' r a pergunta deve ser feita mentalment 
e), e em se" 

570 PRINT"gu i da, solicitar Cment alment e> gue a rcsposta seja d 
ada atraves" 

575 PRINT "dos oraculos, assim guc o programa o solicitar." 

580 PRINT 

585 I-IUNI I A8 ^ 30 ) "ADVLRTENC1 A" SPRINT 

590 PRINr"0 I CHING deve ser usado com parcimonia, ou seja, ap 
enas em as- suntos REALMENTL i mport antes . " 

595 G0SUB20 
600 CLS 
610 G0T060 
615 CLS 

620 PRINTCHR4<23> 

625 PR INT8276, "I CHIN G"; 

630 PRINT 246U , "-0 LIVRO DAS MUTACOES"; 

635 F0RY-iT0i20U:NEXr 
640 RETURN 
645 END 



A formafao dos hexagramas segue 
ngorosamente o metodo especificado no 
livro. Na verdade, ninguem que desco- 
nhega qual e este criterio podera enten- 
der o programa, pois nSo conhecerd as 
premissas basicas necessanas. 

Existem alguns programas para com- 
putadores que realizam este calculo, mas 
nenhum, ao que se sabe, conseguiu o 
rigor aqui apresentado. 0 programa, 
evidentemente, nao substitui o livro, 
pois somente forma e calcula os hexa- 
gramas. 0 texto devera ser buscado no I 
CHING, segundo os hexagramas apre- 
sentados. Infelizmente, nao existem tra- 
dugOes perfeitas para o portugues: em 
todos os casos, s3o versOes do ingles, ao 
inves de terem sido traduzidas direta- 
mente do chines. Mesmo assim, algumas 
versOes s3o boas para um entendimento 
da obra. Em geral, o I CHING d conhe- 
cido em portugues como Livro das Mu- 
tag6es, Livro das Transmutagoes, ou 
ainda, como Livro das Transformag&es. 

0 programa foi escrito em BASIC pa- 
ra o CP-500 e roda com poucas modifi- 
cagoes em outros equipamentos. ■ 



Luiz Gonzaga de Alvarenga 6 T6cnico em 
Telecomunicaqoes, trabalhando na Embratel 
em GoiSnia, onde reside. 
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A reiagao entre nomes e numeros e toda a energia que e/es traduzem 
sao reveladas neste programa para os micros da linha Sinclair 



Diga seu nome... 
o micro lhe dira quem es 

David Abramowicz 



ste programa vai revelar a voce 
a energia que os nomes 
carregam atraves da 
numerologia, que e uma disciplina 
provemente .da cabala (linha esote'nca 
oriunda da religiao judaica). Esta 
disciplina determina, para cada letra de 
urn nome ou palavra, um valor numdrico 
especffico, podendo-se assim descobrir o 
tipo de mensagem que emana de cada 
nome. 

Antes de sabermos como o programa 
opera, vamos falar um pouco sobre 
essa disciplina desconhecida de muitos 
ocidentais. 

A cabala divide o ser humano em quatro 
princfpios: espirito, mente, alma e 
corpo. Cada um deles corresponde 
respectivamente aos elementos fogo 
ar, agua e terra, sendo que a mente 
e o espirito sao amorfos e a alma flui 
dentro do corpo que e formativo da 
materia. A energia espiritual e 
dividida em tres aspectos que sao a vida, 
vontade e forga;a energia mental em 
percepgao, razSo e emogao;e as do 
corpo fisico em absorgSo, circulagao e 
se ere gao. 

A numerologia esta baseada nestes 
princfpios e quando se entendem as 
propnedades e as virtudes dos numeros 
dispoe-se da chave numero um para 
o conhecimento dos misterios da 
natureza. Os numeros determinam todas 



as simpatias e antipatias, discordia e 
harmoma entre os corpos naturais, o 
espirito natural e os seres humanos. 

Cada letra possui um valor numdrico e 
mantem tambdm uma relagao oculta 
com o som. Nome e qualidade nao sao 
sen2o numeros trazidos a sua equagao 
final. 

Ap6s essa rapida elucidagao, vejamos 
como o programa opera. 

OPERANDO 0 PROGRAMA 

Este programa, desenvolvido no CPD de 
MICRO SISTEMAS, foi estruturado 
para ser armazenado em fita cassete com 
instrugSo automdtica de execugao. 

Isso 6 feito para evitar que os dados 
contidos na matriz geradora de 
mensagem (figura 1) nao se percam 
acidentalmente por um RUN ou 
CLEAR. 

Primeiro digite a listagem em BASIC do 
programa. Tecle RUN 1000 e entre com 
as mensagens da matriz (figura 1), uma a 
uma. Apos isso, prepare o gravador e, 
pressionando qualquer tecla, o programa 
sera arquivado em fita. 

Quando da execugao do programa, voce 
devera entrar com o nome escolhido e 
aguardar a mensagem referente. Lida 
a mensagem, para processar outro 
nome, basta apertar qualquer outra tecla. 



10 REM 
20 REM 

30 REM NUMEROS 

40 REM CABALISTICOS 

50 REM 

60 REM CPD-MICRO SISTEMAS 

70 REM RD/HC 

80 REM 
90 REM 

100 FOR A=0 TO 31 

110 PRINT AT 0,A;"H";AT 20, A; "B 

II 

120 NEXT A 

130 FOR A=1 TO 19 

140 PRINT AT A, 1; "d" ; TAB 30; "E" 

150 NEXT A 

160 PRINT AT 2,6; "NUMEROS CABAL 
ISTICOS" 

170 FOR A=17 TO 5 STEP -1 
1B0 PRINT AT A+1,4; " 

" ; AT A , 4; "MICRO SIS 
TEMAS - ANO III" 

190 FOR Y =1 TO 15 
200 NEXT Y 
210 NEXT A 

220 PRINT AT 8,1;" " ; TAB 30;" " 

; T AB 1;" " ; TAB 30;" " ; TAB 1;" "; 
TAB 30;" " ; TAB 1;" " ; TAB 30;" " 
230 FOR A=0 TO 31 
240 PRINT AT 7,A;"S";AT 12, A; "H 

II 

250 NEXT A 

260 LET AS=" 0000100200300400500 
60070080090090100200300400500600 
70080090100200700000300400500" 

270 FOR A=13 TO 19 

. . , : ' =■ ■ 1 
. — J" 

290 NEXT A 

300 PRINT AT 9,1; "NOME? "; 

310 INPUT US 

320 IF U$="" THEN GOTO 310 
330 PRINT US 




14 
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340 LET US=US+" " 

350 LET X=0 
360 FOR A=1 TO LEN US 
370 IF US (A)<" A" OR US(A)>"Z" T 
HEN GOTO 410 

380 IF US (A) ="C" AND US(A+l)="H 
" THEN GOTO 700 
390 LET Y = (CODE US(A)-37)*3 
400 LET X=X+ VAL A8(Y TO Y+2) 

410 NEXT A 

420 FOR A=13 TO 19 

430 PRINT AT A, 2; " 

440 NEXT A 

450 PRINT AT 11,30-LEN STR$ X; X 
460 PRINT AT 14,0; 

470 LET Y=VAL "(76 AND X=1390)+ 
(75 AND X=1260)+(74 AND X=1095)+ 
(73 AND X=666) + (72 AND X=490) + (7 
1 AND X=365) + (70 AND X=360)+(69 
AND X=350) + (68 AND X=318)+(67 AN 
D X=215) + (66 AND X=120)+(65 AND 
X=8l) " 

480 IF NOT Y THEN GOTO 560 
490 PRINT TAB 3;M$(y) 

500 IF INKEYS="" THEN GOTO 500 
510 PRINT AT 9,0; 

520 FOR A=1 TO 3 
530 PRINT " 

II 

540 NEXT A 

550 GOTO 270 

560 LET Y = INT (X/1000) 

570 IF Y =1 THEN PRINT TAB 3;MS( 
64) 

580 IF Y >1 THEN PRINT TAB 3;Mo( 
Y) 

590 LET X=X-Y*1000 



1 


AMBICA0 E DETERMINACAO 


39 


HONRA 


2 


M0RTE E DE STRUICA0 


40 


FESTAS E FER IAS 


3 


FE NO FUTUR0 


41 


VERGONHA E DESGRACA 


4 


F0RCA E P0DER 


42 


VIDA CURTA E TRISTE 


5 


UNIA0 FELIZ 


43 


TEMPLOS E ADORACAO 


6 


SUCESS0 C0MPLET0 


44 


PODER E SOBERANIA 


7 


TRANQUILIDADE 


45 


PROGENIE 


8 


EQUIDADE E PR0TECA0 


46 


FERTIL IDADE 


9 


MAG0A E TRISTEZA 


47 


VIDA LONGA E FELIZ 


10 


REN0VACA0 E L0GICA 


48 


3 ULGAME NTO 


11 


DISPUTA E DECEPCAO 


49 


ESPEIRITO MERCENARIO 


12 


REAL IZ AC AO 


50 


PERDAO E ALIVIO 


13 


CAMINHO T0RTU0S0 


51 


VIUVEZ 


14 


RENDICAO 


52 


INICIACAO E CIENCIA 


15 


PIEDADE E VIRTUDE 


53 


RECUPERACAO E PROTECAO 


16 


SENSUAL IDADE E LUXURIA 


54 


AFLICAO E ERRO 


17 


AZAR E PERDA 


55 


ANGELICAL 


18 


UIC 10 E BRUTAL IDADE 


56 


MEDO E HESITACAO 


19 


L0UCURA 


57 


CRENCA E FILOSOFIA 


20 


SABEDOR IA E AUSTER IDADE 


58 


LONGAS VIAGENS 


21 


CONHECEDOR DOS MISTERIOS 


59 


VIRTUOSIDADE 


22 


VINGANCA E CASTIGO 


60 


PERFE ICAO 


23 


IGNORANCIA 


61 


DOMINIO E PODER 


24 


VIAGEM E MUDANCA 


62 


CONQUISTA E IMPERIO 


25 


INTEL IGE NC IA 


63 


DISPUTA E GUERRA 


26 


ALTRUISMO 


64 


CLEMENCIA E SIMPATIA 


27 


BRAVURA 


65 


0 ADEPTO 


28 


AMOR E PRESENTES 


66 


HONRA E PATRIOTISMO 


29 


INFORMACAO E COMUNICACAO 


67 


AZAR E TRISTEZA 


30 


CASAMENTO E FAMA 


68 


MENSAGEIRO DIVINO 


31 


AMBICAO E INTEGRIDADE 


69 


ESPERANfA E 3USTICA 


32 


UNIAO E CA5AMENT0 


70 


LAR E SOCIEDADE 


33 


BONDADE E PUREZA 


71 


A CIENCIA DAS ESTRELAS 


34 


SOFRIMENTO E RECOMPENSA 


72 


SACERDOCIO 


35 


FEL IC IDADE E SAUDE 


73 


INIMIZADE E INTRIGA 


36 


GENIAL IDADE 


74 


SILENCIO E RESERVA 


37 


F IDEL IDADE DOMESTICA 


75 


ABORRECIMENTOS 


38 


AVAREZA 


76 


PERSEGUICAO 



Figura J 
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600 LET Y=INT (X/100) 

610 IF Y THEN PRINT TAB 3;MS(Y + 
54) 

620 LET X=X-Y*100 
630 LET Y=INT (X/10) 

640 IF Y>4 THEN PRINT TAB 3;MS( 
Y + 45) 

650 IF Y<5 THEN GOTO 670 
660 LET X= X-Y* 10 
670 IF X ’ THEN PRINT TAB 3; MS ( X) 
680 GOTO 500 
700 LET X=X+600 
710 LET A=A+1 
720 GOTO 410 
1000 FAST 
1010 DIM MS (76 , 24) 

1020 FOR A=1 TO 76 
1030 SCROLL 
1040 INPUT MS ( A) 

1050 PRINT A; TAB 4;M$(A) 

1060 NEXT A 
1070 CLS 

1080 PRINT AT 21,0; "PREPARE 0 GR 
A VADOR" 

1090 PAUSE 4E4 
1100 SAVE "CABALA" 

1110 SLOU 
1120 GOTO 1 



David S. H. Abramowicz § Engenheiro Eietrd- 
nico e faz mestrado de Comunicagao na 
UFRJ. Trabalha como Con suitor na Area de 
Arquitetura de Redes de Microcomputadores. 
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Formula 1 
Commander 
Guerra no Pacifico 
Capa ao Tesouro 
Simulador de Voo 
Estoque 1 
Microcalc 
Defender 
r Master (xadrez) 
Speed Racer 
e muitos outros 



Cartucho Atari 

Aplicativos p/CP-500. Digitus e Polimax 

Distribuicao exclusiva de programas das 
marcas MICROLINE. INFINITUS e SUPERSOFT 

PECA LISTA DE PRECOS 



D DIGITAL 

o enderepo dos microcomputadores 

Rua da Conceipao, 377/383 
Fone: (0512) 24-1411 
90000 • Porto Alegre • RS 



• Traducoes e versoes 
exclusivas para a 
comunidade de informatica. 

• Pioneiros no setor. 

• Manuaise publicacoes 
diversas. 

• Graficos. 

• Supervisao Tecnica de 
profissionais atuantes - 
analistas e consultores. 

• "Linguagensdealtonivel" 
aliadas a qualidade/ 
velocidade de entrega. 

Disc :ougtz / 

TRADUQOES 

Informacoes 

pelos telefones: 

(021) 264-6392 
264-7391 
228-2798 






ICRO PROCESS 

COMPUTADORES LTDA. 

• Microcomputadores 

Microdigital, Prologica e Similares Apple. 

• Aulas de Basic 

• Monitores, Impressoras 

• Programas de Contabilidade, aplicativos, jogos, etc. 

• Pacotes de programas para a area de Advogados, 
Open Market, Dentistas, Administrate) de Imoveis 

• Programas para Engenharia, Arquitetura, 

Controle de Construgoes, etc. 

• Elaborapao de programas por encomenda. 

• Personalizag3o de programas para firmas e 
profissionais liberais. 

• Jogo Odissey/Dactari. 

• Manutenpao e TransformagSo de Televisores 

• Revistas e Publicapoes Tecnicas 

• Amplo Financiamento 

• Despachamos por nossa conta via Varig. 

TEL: 64-0468 

Alameda Lorena, n° 1310 - CEP 01424 
Sao Paulo 

*** ESTACIONAMENTO PARA CLIENTES *** 





Kristian 



MICROCOMPUTADORES 



DGT-100 CrJ 240.000, x 3 — Gratis 18 logos 

CP-200 CrJ 110.000, x 2 — Gratis 6 jogos 

TK85 CrJ 89.925, x 2 — Gratis 6 jogos 

TK82-C CrJ 49.925, x 2 — Gratis 6 jogos 

ainda: UNITRON Ap II. Mem 64K, 

Joystick. Impressoras. etc... 

(Prepos sujeitos a modillcapdes) 

PROGRAMAS PRONTOS EM FITAS 



JOGOS 

VISITA AO CAHINO 
MIDWAY 

PASSAGEM PARA 
O INFINITO • 2.* DIMENSAl 

10 JOGOS • JORNADA I 

EXCITANTES ESTRELAS 

PARA 1 K E MUITO MAIS! 




JOGOS: 

SCARFMAN 
PENETRATOR 
SUPERNOVA 
VIAGEM A VALKYRIA 
ASILO 1 
AVENTURAS 
DEFENSE COMMAND 
E MUITO MAIS' 



LEASING E CRfcDITO DIRETO! 


LITERATURA 

• MICRO-SISTEMAS 

• INTERFACE 

• JORNAL TK-CP 

• IMPORTADOS 


+ CURSOS DE BASIC 

GRATIS 

NA COMPRA DE QUALQUER MICRO 



DESPACHAMOS PARA TODO O BRASIL! 



APLICATIVOS 

CONTROLE DE ESTOQUE 
CONTAS A PAGAR/RECEBER 
MALA DIRETA/CADASTRO 
FOLHA DE PAGAMENTO 
ViDEO-CLUBES 
ESTATISTICOS 

SOFTWARE SOB ENCOMENDA 




Rua da Lapa, 120 Gr. 505 
Rio de Janeiro - RJ 
Tel.: (021) 252-9057 




Lytel, A.; Marques, 

C. A. M., Novo ABC 

dos Computadores, 

Editora Antenna, 

Cr$ 4.000,00 
(nov/83). 

Descrever computadores analogicos e digitais abor- 
dando aspectos t^cnicos de sua constituigao eletronica e 
formas de programagao £ uma tarefa ambiciosa; faze-lo 
em apenas 175 p^ginas 6 tarefa quase impossfvel. No en- 
tanto, Allan Lytel e Carlos Alberto M. Marques conse- 
guiram esta proeza no livro "Novo ABC dos Computado- 
res". 

O livro 6 , na verdade, uma atualizagao do "ABC's of 
Computers", do prdprio Allan Lytel, publicado no Bra- 
sil sob o tftulo de "ABC dos Computadores". Segundo 
Carlos Alberto Marques, a atualizagao do livro original 
de Lytel se fez necessSria devido ao "vertiginoso aper- 
feigoamento tecnoldgico do setor que nos legou o cir- 
cuito integrado, antes a novidade era o transistor". 

Nessa nova vers2o, o livro obedece a um padrao de 
descrigao amena, pordm completa, apresentando, ao Ion- 
go de seus doze capi'tulos, todos os aspectos da computa- 
gao, desde a descrigao teorica dos circuitos eletronicos 
digitais que constituem um computador at6 as linguagens 
de programag3o que permitem seu uso, passando pela 
tecnologia de fabricagao dos circuitos integrados. 

A leitura do livro n§o exige conhecimentos profundos 
de eletronica digital, mas uma pequena nog§o 6 impres- 
cindi'vel para o perfeito entendimento dos circuitos ele- 
tronicos descritos. 

Os capi'tulos que tratam dos "Circuitos Ldgicos B3si- 
cos", "Multivibradores" e "Contadores" foram total- 
mente reescritos, em comparagao com o original, utili- 
zando-se uma simbologia gr^fica moderna e referencias 
2 tecnologia mais empregada atualmente: a TTL. 

O capi'tulo sobre os "Circuitos Integrados" foi intro- 
duzido especialmente para aprofundar as t6cnic§s de 
criagao de um circuito integrado, descrevendo um dos 
m^todos para a confecgao destes dispositivos miniaturi- 
zados. 

Nao menos importante 6 o capi'tulo relativo aos dis- 
positivos de entrada e safda de informagoes, isto 6, de 
perifericos, que foi atualizado com referencias aos vi- 
deoterminais, impressoras matriciais, discos flexi'veis, 
etc. 

Os demais capi'tulos tratam de: "Computadores — 
Digitais e Analdgicos", "Numeros para Computadores", 
"Operagoes Aritmdticas", "L6gica Simbolica", "Circui- 
tos Calculadores", "Armazenamento de Dados" e "Pro- 
gramagao". 



NOVO ABC 
DOS 

COMPUTADORES 

AUA'ttMIt 

CAHLUS AlMHlK V VAMOKlt 
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filcres 



NOVIDADES 



SOFTWARE 



PREgO ESPECIAL 
POR ATACADO 



CP-300/CP-500 

JOGOS 

BATALHA A£- 

REA(F) 4.000 : 

FORCA (F) 4.500* 

TIRO AO ALVO 

(F) 4.000* 

TABUADA (F) .. 4.000* 

COMANDO UFO 

(F) 5.000* 

PATRULHA (F) . . 6.000* 
INVASORES (F) . 5.500* 
PADDLE PINBALL 

(F) 9.600* 

DISCOS VOADO- 

RES(F) 8.000* 

DANCING DE- 
MON (F) 8.000* 

XADREZ (F) 10.000* 

CUBO (F) 6.400* 

JORNADA NAS 
ESTRELAS (F) .. 9.500* 

ELIZA (F) 7.000* 

COSMIC (F) 9.600* 

SCARFMAN (F) . 9.600* 
LUNAR (F) 9.600* 



BARRICADA (F) . 9.600* 

GALAXI (F) 9.600* 

METEOR (F) ..... 9.600* 
PENETRAITOR(F) 9.600* 
10 JOGOS EM BA- 
SIC (em disco, boa, 
sky, pouso lunar, 
jornada, teaser, cu- 
pim, hopper, cram, 
fireman, space fire. 24.000 
APLICATIVO 
- CADASTRO DE 
CLIENTES (F) 15 0RTN 

(D) 20ORTN 

-MALA DIRETA 



24.000 



(D) 


- 30.000 


- FINANgAS (D) 


. 30.000 


- PROCALC (D) . 


. 40.000 


- VIDEO (F) . . . 


. 10.000* 


- BANNER (F) . . 


. 6.400* 


- SCRIP (D) . . . . 


. 40.000 


(F) 


. 32.000 



- DIRET0RIO (D) 16.000 

- BANCO DE DA- 
DOS (D) 40.000 

- CARTA ASTRAL 

(F) 15.000 

-ODONTO(F) . 30 ORTN 
(D) 50 ORTN 

- CONVERT (F) . . 6.400 

-LISTA(D) 16.000 

- SUPERTECLA 

(F) 8.000 

- EDITOR (D) ... 32.000 

- SOUND (F) 6.400* 

LEGENDA 

F - Para programa em fita 
D • Para programa em disco 
* Acrescentar Cr$ 6.000,00 
p/versao em disco 

COMPLETA LINHA DE 
PROGRAMAS PARA 
ENGENHARIA. 

VIGAS CONTI'- 

NUAS 14.000 

LAGES 14.000 

PORTICOS 16.000 

TRELICA 16.000 

VIGA SOBRE BASE 

ELASTICA 14.000 

OPERAOOES COM 

MATRIZES 14.000 

RESOLUg. EQUA- 
gAO DE GRAU0. .14.000 
CALC. ELEMENT. 
DOTRlANGULO. .14.000 
CONVERSAO DE 

UNIDADES 14.000 

DIMENS. PCS. 
CONCR. ARMADO 14.000 
VIGAS CURVAS . . 14.000 



1 6.000 CP-200 



AGENDA 9.500 

BATALHA AEREA . 4.000 
BATALHA NAVAL . 5.500 

BIORRITMO 4.000 

CAD. DE CLIENTES1 3.500 
COMANDO UFO . . 4.000 
CONTAS A PAGAR 13.000 

FORCA '. . . 4.000 

LOTO 4.000 

OESTE SELVAGEM 4.500 

SENHA 4.500 

SIMULADOR DE 

V0O 6.500 

TABUADA 4.000 

TIRO AO ALVO . . 4.000 
VIDEO TlTULO . . .15.000 

VU-CALC 10.000 

PACOTE ECON0- 

MICO 4.000 

METEOR 5.200 

INVASION FORCE 9.600 
3D DEFENDER . . . 7.200 
KRAZV KONG . . . 9.600 
RED ALERT ..... 7.200 

PUC MAN 9.600 

INTELECTO I 7.200 

DODGEM 5.000 

POUSO EM MARTE 5.000 

ALBATROZ 5.500 

ALERTA VERME- 

LHO 5.500 

MAZOGS 9.000 

DUELO 5.000 

O. V. N. 1 4.500 

COMANDO SUB- 

MARINO 5.500 

BASE ALPHA 5.500 



CORRIDA C/OBS- 

TACULOS 4.000 

AMBASSADOR . . . 4.500 
BATALHA NAVAL 

II 6.000 

CO LECION ADOR 
DE CRISTAIS .... 6.500 
PERIGO, SERPEN- 

TE!!! 6.500 

SELVA 7.000 

LAB I R INTO 5.000 

ROLETA 4.500 

BRANCO NO PRE- 

TO 5.000 

ARTILHARIA 5.000 

SIMULADOR DE 

V0O II 8.000 

METEORO 6.500 

KING KONG 7.500 

FUNGALOIDES . . 7.500 
SIMULADOR DE 

V0O III 9.500 

BLOQUEIO 5.000 

SUPER STANDART 6.500 

DERBY 4.000 

GUERRA DOS MIS- 

SEIS 4.500 

JORNADA NAS ES- 
TRELAS 8.500 

COME A COBRA.. 5.500 
EDITOR DE TEXTOI 2.000 

ELIZA 7.500 

COMPILADOR AS- 
SEMBLER 8.500 

D E SASSEMB LA- 

DOR 8.500 

DESCHAVEADOR .10.000 
CONTROLE BAN- 

CARIO 13.800 

ESTOQUE 13.800 

MOTOR A EXPLO- 

SAO 6.800 

SOUNDMAKER I . . 9.600 
GRAPHMAKER I . . 6.800 
FROGGER 9.600 



DISTRIBUTOR EXCLUSIVO 




t AS 18 HORAS, INCLU- 
LHOR ATEND£-LO. 

S) 



- CONTROLE 
AgOES (F) . 



6.400* 



filcres 



Filcres Importapao e Representapoes Ltda. 

Rua Aurora, 1 65 - CEP 01 209 - Sao Paulo - SP 
Telex 1 1 31 298 F I LG BR - PBX 223-7388 - Ramais 2, 4, 

12, 18, 19 - Diretos: 223-1446, 222-3458, 220-5794 e 
220-9113 - Reembolso - Ramal 17 Direto: 222-0016 - 220-7718 
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Alguns truques de proteqao de pro gram as e o que fazer 
para deixa-los com sua marca registrada 




Programas trancados e selados 

Rudolf o Horner Junior 



ual £ o programador que, mui- 
tas vezes, nao deseja impedir 
que seu programa possa ser lis- 
tado'por pessoas que venham a utiliza- 
lo? Talvez todos. E o caminho £ manter 
em segredo a estrutura de dados empre- 
gada em sua confec?ao, dificultando 
assim qualquer tentativa de altera?ao 
por pessoas nao autorizadas. 

Imbir a listagem de programas e, em 
geral, um trabalho dificil, pois qualquer 
programador com razoavel conhecimen- 
to pode fazer o que quiser com o mi- 
crocomputador, o que sigmfica dizer 
que nao importa qual o processo de pro- 
te 9 ao utibzado: sempre sera possivel 
contornd-lo, de uma forma ou de outra. 

Na verdade, o mdtodo mais eficaz se- 
ria a eliminacao do comando LIST da 
linguagem BASIC. Este comando £ resi- 
dente na membria ROM do Apple, e 
simplesmente retird-lo, sem ter que me- 
xer no hardware da maquina, £ lmpossi- 
vel e tambdm desnecessario. Portanto, £ 
mais coerente nos atermos aos recursos 
que o proprio equipamento oferece para 
este tipo de procedimento. 

Para realizar nosso mtuito devemos 
impedir, em qualquer momento, que o 
usuario tenha controle sobre um progra- 
ma sem que este esteja sendo executado. 
Os que sao gravados em fita cassete, por 
este motivo, nao permitem muitas for- 
mas seguras de prote 9 ao, uma vez que, 
para recebe-los na membria, o usudrio 



deverd ter pleno controle sobre a maqui- 
na no momento em que carregar um 
programa. Se ele pode fazer isto, pode 
tambdm listar o que acabou de carregar. 

As formas de bloqueio que discutire- 
mos a seguir serao decorrentes da execu- 
9 §o do proprio programa que estamos 
tentando esconder e, justamente por 
isso, so funcionarao a medida em que 
ele for sendo rodado. Assim sendo, no 
momento em que a execu?ao principiar, 
o programa deverd executar procedi- 
mentos de seguranga de forma a impe- 
dir uma interrupfao ou, pelo menos, 
tornar impossivel a obten^ao da lista- 
gem do programa logo apos a interrup- 
9 ao (caso nao se consiga impedi-la). 

CRTL-C E RESET 

No Apple existem duas maneiras de 
se interromper a execu 9 ao de um pro- 
grama em BASIC. Uma delas e pressio- 
nando CRTL-C. Neste caso, o programa 
£ interrompido e aparece na tela o 
numero da linha onde ocorreu a quebra. 
A segunda £ atravds do uso da tecla 
RESET. Normalmente o uso desta tecla 
consegue parar temporanamente qual- 
quer coisa. 0 que temos a fazer £, por- 
tanto, utilizar um processo que seja ca- 
paz de inibir estes dois recursos disponi- 
veis ao usuario. 

Inibir o CRTL-C £ muito facil. Basta 
criarmos, em nosso programa, uma roti- 



na de erro e empregarmos o comando 
BASIC que transfere a execu?ao do pro- 
grama para esta rotina toda vez que 
alguem tentar interromper a execu 9 ao 
com CRTL-C ou quando ocorrer algum 
erro de qualquer espdcie durante a mes- 
ma. 0 comando £ ONERR GOTO. 



10 


ONERR GOTO 70 




20- 


POKE 40286,35: 


POKE 40237,216 


30 


HOME : UTHB 3 




40 


PRINT "PROGRAMS TESTE" 


50 


PRINT : PRINT 


TENTATIUaS DE 




-INTERRUPCAQ: 


SN 


60 


GOTO 60 




70 


ONERR GOTO 70 




30 


POKE 40236,35: 


POKE 40287,216 


30 


■1 = N + is GOTO 


10 


100 


PEN ESTE PROGRrMH SONENTE F 




UNCIONh PARA 


D.O.S." COM 43 




K DE RAM 





Figura 1 



Veja o programa listado na figura 1. 
Logo na primeira linha existe um co- 
mando deste tipo que estabelece: ocor- 
rendo um erro durante a execugao - ou 
caso o usuario use CRTL-C na tentativa 
de interromper o programa esta deve- 
rd ser transferida para a rotina que prin- 
cipia na linha 70, a qual dara o devido 
tratamento ao erro encontrado. 

Quando a-execu 9 ao e transferida para 
a rotina de erro, o micro coloca, no en- 
dereijo de memoria numero 222 (deci- 
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mal), um cbdigo que define o motivo 
pelo qual . a rotina de tratamento de 
erros foi ativada. Caso tenha sido pelo 
uso de CRTL-C, o conteudo do endere- 
90 de memoria 222 serd igual ao maxi- 
mo valor que um byte pode assumir, ou 
seja, 255. Qualquer valor que seja menor 
que este acusaranao uma tentativa de 
interrup 9 ao, mas sim um erro na execu- 
9 S 0 do programa. 

Para conseguirmos inibir tambem a 
tecla RESET, deveremos usar certos va- 
lores em determinados endere 90 s de me- 
moria que tern por fun 9 §o fazer com 
que a execu 9 ao do programa tambem 
seja transferida para a rotina de erro 
quando do uso da tecla RESET. 

Ainda com rela 9 ao ao programa da 
figura 1 , veja a linha numero 20. Atraves 
dos valores que atnbuimos a dois ende- 
re 90 s de membria, atingimos nosso obje- 
tivo. Experimente o programa (aten 9 ao: 
ele so funciona para equipamentos com 
pelo menos 48Kb de membna RAM e 
que estejam com o DOS carregado). Co- 
mece a rodd-lo. Tente interrompe-lo. 
Use CRTL-C. Use RESET. Veja como a 
execu 9 §o nSo cede. 0 programa ficard 
contando o numero de tentativas feitas 
pelo usudrio para quebrar sua execu 9 So. 
Conclusao: se a execu 9 ao nao pode ser 
mterrompida, o programa tambem nao 
poderd ser listado. 

Para alcazar o mesmo efeito, basta 
que voce use o comando ONERR 
GOTO e coloque os valores certos nos 
bytes 40286 e 40287. No final do pro- 
grama voce deverd cnar uma rotina de 
erros para o tratamento de tentativas de 
interrup 92 o. Esta poderd ser semelhante a 
que apresentamos aqui. Outra altemativa 
seria simplesmente executar um comando 
NEW e eliminar completamente o pro- 
grama que estd em execu 9 ao na memo- 
na caso o usudrio tente interrompe-lo. 
Neste caso, apbs o NEW, o controle do 
computador retornara as maos do usud- 
rio mas, mesmo que seja usado o coman- 
do LIST, a memoria estard apagada e 
nao sera possivel, aos menos experien- 
tes, recuperar a listagem que estava sen- 
do gravada antes da execu 9 ao do coman- 
do NEW. Lembre-se, portanto, dos valo- 
res que devem ser colocados para mibir 
o uso da tecla RESET: POKE 40286,35: 
POKE 40287,216. 

Existe ainda um outro recurso que 
impede que o programa seja hstado mes- 
mo se a execu 9 §o for interrompida. Bas- 
ta que, logo no micio da execu 9 ao do 
programa, seja colocado, no endere 9 o 
de memoria 214 (D 6 em hexadecimal), 
um valor maior que 127. Quando o va- 
lor encontrado neste endere 90 for 
maior que 127, todas as entradas de ca- 
racteres feitas pelo teclado serao inter- 
pretadas como se fossem 0 comando 
RUN. Qualquer coisa que seja digitada 
pelo usuario fard com que a execu 9 ao 



do programa que esteja na memoria vol- 
te a ser efetuada novamente. 

Use entao POKE 214,255 logo no 
pnncipio de seu programa. Caso o usua- 
rio interrompa a execu 9 ao, o comando 
do computador, aparentemente, ira re- 
tornar ds suas maos. Entretanto, qual- 
quer sequencia de caracteres que ele ten- 
te mtroduzir pelo teclado nao sera inter- 
pretada de outra forma senao como o 
uso do comando RUN — e a execu 9 ao 
do programa sera retomada novamente 
sem que seja possivel listd-lo. 

MARCA REGISTRADA 

Vamos ver agora como o programa- 
dor poderd registrar uma linha, ao final 
de qualquer listagem, com sua marca re- 
gistrada — sem que esta linha possa ser 
retirada com facilidade e sem que isto 
signifique a mutila 9 ao do programa. 

Todas as linhas que sao registradas 
pelo interpretador BASIC tern sua nu- 
mera 9 ao de 0 a 63999. Podemos, alte- 
rando os valores dos bytes que codifi- 
cam o programa para o computador, 
aumentar estes valores de forma a nao 
ser possivel eliminar as linhas com 
numera 9 ao alterada e nem retira-las da 
hstagem do programa. 

Os numeros relativos ds linhas sao re- 
gistrados, intemamente, com o uso de 
dois bytes. Quando colocamos nossa 
marca registrada em uma linha, pode- 
mos, modificando estes dois bytes, alte- 
rar este numero para um valor que nao 
possa ser adulterado ou eliminado pelo 
interpretador BASIC. Serd uma linha 
protegida, bem mais dificil de ser altera- 
da do que as outras. 

Considere a seguinte rotina: 

60000 B = PEEK (105) +256*PEEK (106) : FOR 
A = B - 256 TO B : IF PEEK ( A ) +PE 
EK ( A + 1) * 256 <>63999 THEN NEXT 
60010 POKE A, 255 : POKE A+1,255 : DEL 600 
00 , 600 10 : END 

63999 REM MARCA REGISTRADA DO PROGRAMADOR 



Se voce inseri-la no final de seus pro- 
gramas, marcando a linha 63999 com 
sua marca registrada e dando um RUN 
60000, a rotina encontrara sua marca na 
listagem do programa e mudara o valor 
dos bytes que defmem o numero da li- 
nha. Uma vez feito isto, serd bem mais 
dificil retird-la. 

Experimente executar a rotma listada 
e use o comando LIST para ver o resul- 
tado. As linhas 60000 e 60010 terao de- 
saparecido e a linha remanescente, com 
a marca registrada, estard com um 
numero impossivel de se atingir com o 
uso unico do interpretador BASIC. m 

m 



Rudolf o Horner Junior curse Ciincia da Com- 
putaQao na Unicamp e 6 sdcio da Potencial 
Software, firma que produz programas espe- 
ciais para microcomputadores em Campinas, 
SP. 




NAO SE ILUDA! . . . 



Na hora de comprar seu 
Minicomputador, Progra- 
mas, Impressoras, etc. 

Consulte quern joga 
aberto. Revenda autoriza- 
da da DIGITUS — MICRO- 
DIGITAL — DISMAC — 
POLYMAX. 

Tambem Manutenpao au- 
to rizad a DIGITUS. 
Comprove nosso atendi- 
mento! 

Prego justo por servipo 
correto. 

TESBI ENG. TELEC. LTDA. 

RUA GUILHERMINA, 638 - ENCANTADO 
.TEL: (021) 591-3297 e 249-3166 
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Como voce se re/aciona em seu ambiente de trabalho? E seus colegas ? 
Faqa uma pesquisa atraves deste programa, para o CP-500 e compativeis 



O micro psicologo 

Antonio Macchi Jr. 



J anela de Johari nao e um teste de 
personalidade,mas uma pesquisa 

sobre o comportamento de um 

individuo em um ambiente qualquer 
onde ele tenha que se relacionar com 
outras pessoas. Este que trazemos aqui, 
em forma de programa para os micros 
da linJia TRS-80 (foi rodado em um 
CP-500), enfocao ambiente de trabalho. 
Quern estiver sendo analisado deverd 
responder a 20 perguntas. Para cada 
uma existem duas altemativas e a pessoa 
deverd distribuir cinco pontos entre elas 
(voce entenderd melhor rodando o 
programa, pois ele 6 totalmente 
auto-explicativo). Ao final, aparecerd na 
tela a representa 9 ao grafica da Janela 
de Johari de quern fez o teste (veja um 
exemplo na figura 1). 

Os quadrantes significant 
• EU ABERTO - o que eu e os outros 
sabem sobre mim 

• EU SECRETO - o que so eu sei 
sobre mim 

• EU CEGO — o que eu nao sei mas os 
outros sabem sobre mim 
• EU DESCONHECIDO - o que nem 
eu nem ninguem sabe sobre mim. 

Para que voce possa aplicar o teste, 
entre primeiro com a rotina para 
gravafao das perguntas; logo em seguida 
entre com elas. Por ultimo, digite o 
programa principal. Voce podera gravar 
em fita ou disquete, e o proprio 
programa o orientara a esse respeito. 

0 programa foi desenvolvido para 
sistemas com 48Kb, mas adaptando-o 
para que a entrada de questoes seja feita 
uma a uma, poderd ser rodado com 
16Kb. 



Antonio Macchi Jr. d formado em Administra- 
Qao de Empresas pela Universidade Federal do 
Rio Grande do Sul. Desde 1980 utiliza um 
TRS-80, desenvolvendo programas aplicativos 
e jogos. 



Rotina para gravacao 
das perguntas 



JOHARI 



0 CLS : PR I NT : PR I NT 

1 PR I NTT AB < 15)"* ******************* 

2 PRINTTAB C 15 ) * * JANELA DE JOHARI * 

3 PR I NT TAB CIS)”* * 

4 PR I NTT AB < I S > * * uma apticacao de PSICOLOGIA * 

5 PRINTTAB ( 15)“* em MI CROCOMPUTADOR * 

6 PRINTTAB ( 15)“* * 

7 PR I NT TAB (15)"* pop: A. MACCHI JR. & A. MACCHI III * 

8 PRINTTAB < 15 ) “ * SALVADOR - BAHIA - MAI/82 * 

9 PRINTTAB < 1 5 ) * * font: <071) 248.13.87 * 



uma apl icacao de PSICOLOGIA 
em MI CROCOMPUTADOR 



8 PRINTTAB < 15 ) “ * SALVADOR - BAHIA - MAI/82 *" 

9 PRINTTAB < 1 5 ) " * Tones <071) 248.13.87 *" 

10 PR I NTT AB < 1 5 > " * *******************" 

11 FOR I 7.= 1 TO 1 000 s NEXT 17. 

15 CLEAR 1 5000 : D IMP* <20 ) . A* < 20 > » B* < 20 > . D7. < 20 > . G* < 58 > 

20 P*=- MENU DE ROT I NAS * : GOSUB 1 000 « PR I NT9340 , - 1 . LER QUESTOES DA 

FITA" :PRI NTS404 . " 2. LER QUESTOES DO D I SCO* s PR I NT9468 . " 3. DIGITAR 
QUESTOES" s PRINT3532. *4. GRAVAR QUESTOES EM D I SCO* : PR I NT9596 t " 5 . GR 
AVAR QUESTOES EM F I TA " : PR I NT9832 . STR I NG» < 60 . 1 40 ) 

25 PRINT9909. "DIGITE O NUMERO DA ROTINA DESEJADA* 

26 R*=INKEY*: IFR*=" "ORR*<" 1 " ORR*> * 5 " THEN26 
30 ONVAL < R* ) GOT 0 1 00 . 150.200. 250.300 

100 GOSUB 1 200 SGOTO20 
150 GOSUB 1100: GOTO20 

200 P*=" INSTRUCOES " : GOSUB 1 000 : PR I NT : PR I NT : PR I NT : PR I NTTAB < 1 

2) "OS ESPACOS EM BRANCO CONSTANTES DA RELACAO DE • : PR I NTT AB < 1 2 ) " QUE 
STOES DEVEM TAMBEM SER DIGITADOS PARA FOR-" 

205 PRIM TTAB< 12) "MATAR MELHOR A TELA NA OCASIAO DA EXECUCAO DO"»PR 

INTTAB < 12) "PROGRAMA. • : PR I NT9832. STR I NG* < 60 . 140) IPRINT9914. " QUANDO 
PRONTO DIGITE <P>" 

210 R*«INKEY*: IFR*=" P " THEN2 1 5ELSE21 0 

215 P*=" DIGITACAO * « FOR I 1 TO20 • GOSUB1 000 : PR I NT 

220 PRINT " P* < * : 17.; " > = " < : I NPUTP* < IX) 

225 PR I NT " A* < " ; 17.; " ) = " ; : INPUTA*< IX) 

230 PR I NT * B* < - I IX; " * I NPUTB* < IX) 

235 PR I NT " DX < * ; IX» " >-" » * INPUTD7.< IX) 

240 NEXT I X s GOTO20 

250 P*=" GRAVACAO EM DISCO "JGOSUB1000 

255 OPEN-O" . 1 . " QUESTOES/TXT" : FOR 1 7.= 1 TO20 : PR I NT9529 . "GRAVANDO QUEST 
AO NUMERO < " ; 1 7. t " > DE 20 QUESTOES " x PR I NT# 1 . P* < I X ) i PR I NT# 1 . A* < I X ) » P 
RINTWl . B* < IX) s PR I NT # 1 . DX < IX) ; NEXT I X « CLOSE * GOTO20 

300 P*=" GRAVACAO EM FITA " IGOSUB1000I PRINT: PRINT" PREPARE CASSETE: 
" IPRINT9529. " COLOQUE FITA VIRGEM E PRESSIONE < PLAY>+< RECORD> " 1 PRIN 
T966B. "QUANDO PRONTO DIGITE <P>" 

305 P*=INKEY»: I FP*= " P " THEN3 1 0ELSE305 

310 PRINT9256. "GRAVANDO QUESTOES " : PR I NT9529 . STR I NG* < 48. 32 > s 

PRINT 9668 . STR I NG* < 25 . 32 ) : PR I NT9832. STR I NG* < 62. 140) :PRINT9896. "AG 
RAVACAO DO ARQUIVO DE QUESTOES DEMORA CERCA DE 8 MINUTOS" 

315 FOR I X= 1 TO20 : PR I NT9529 . "QUESTAO NUMERO <";IX;"> DE 20 QUESTOES" 

: PRINT#- 1 . P* < IX) : PR I NT#- 1 . A* < IX. ) : PR I NT#- 1 . B* < IX ) : PR I NT#- 1 , DX< IX) «N 
EXT IX » GOTO20 
399 END 

1000 CLS : PRINT CHRt < 1 88 ) ; ST R I NG* <5.140);" JANELA DE JOHARI " ; STR I NG 

* <38. 140) ; CHR*< 188 ) : PRINTCHR*< 191 > ; STRING* <6. 32 ) ; " uma apl icacao de 

PSICOLOGIA em MI CROCOMPUTADOR " ; CHR* < 1 9 1 ) : PR I NTCHR* < 1 43 ) 1 

ST R I NG* < 38 . 140) ; P* : STR I NG* < 5 . 140) ;CHR*< 143) : RETURN 
1100 P*=" LCITURA EM DISCO ":GOSUB1000 

1105 OPEN" I'.l. "QUESTOES/TXT" : FOR 1 7.= 1 TO20 : PR I NT9529 , ■ LENDO QUESTAO 
NUMERO <" ; IX; " > DE 20 QUESTOES " : I NPUT# 1 , P* < I 7. ) : I NPUT# 1 . A* < I X ) ! I NP 
UT # 1 . B*< IX > : I NPUT# 1 , DX < IX) : NEXT I X : CLOSE : RETURN 

1200 P*=" LEITURA QUESTOES ": GOSUB 1 000 : PR I NT : PR I NT : PR I NT " PREPARE C 
ASSETE: " :PRINT9529, "COLOQUE FITA DE QUESTOES E PRESSIONE <PLAY>":P 
R I NT9666. "QUANDO PRONTO DIGITE <P>" 

1203 P*= I NKEY* : I FP*= " P " THEN 1 205ELSE 1 203 

1205 PRINT9320. “LENDO QUESTOES - : PR I NT9529. ST R I NG* < 45 . 32 ) : PR I N 

J-aAAA . qTRTNG*<25. 32) : PRTNTapT?. STR I.N&» < A?,_. 40 i : PPTNT3BO '.. a l_FIT 
URA DO ARQUIVO DE QUESTOES DEMORA CERCA DE 8 MINUTOS" 

1210 FORI7.= 1TO20:PRINT9529, "QUESTAO NUMERO <";I7.;"> DE 20 QUESTOES 

* : INPUT#- 1 , P*< IX) : INPUT#- 1 . A* < IX) s I NPUT#- 1 . B*_< IX) : I NPUT#- 1 . D7. < IX): 
NEXTI7.: RETURN 



MICRO SISTEMAS, novembro/83 



Figura 



Perguntas 



) - SE UM COLEGA TEM UM CONFL I TO DE PERSONAL 1 DADE COM UM OU- 
TRO FUNCIONARIO DA ORGANIZACAO QUE TRABALHA EM OUTRO 
DEPARTAMENTO MAS CUJA COOPERACAO E I ND I SPENSAVEL AO 

NOSSO DEPARTAMENTO EU 

) - DIRIA AO MEU COLEGA QUE ACHO QUE ELE E PARC I ALMENTE 
RESPONSAVEL POR ESTE TIPO DE CONFL I TO COM O OUTRO 
FUNCIONARJO E TENTARIA LHE MOSTRAR COMO ESTA OUTRA 
PESSOA ESTA SENDO AFETADA POR ELE 

) - NAO ME ENVOLVERIA NA QUESTAO COM O RECEIO DE VIR A 
ME INDISPOR COM AM80S CASO TENTASSE QUALQUER IN- 
TERFERENCE 
> - 1 



P»< 11 > - SE O MEU RELAC 1 ONAMENTO COM UM SUPERVISOR DIRETO ESTI- 

VESSE SENDO PREJUDICADO POR DISCUSSOES CONSTANTES A 
RESPEITO DE UM MESMO ASSUNTO DE ALTA IMPORTANCE 
PARA NOS DO IS EU 

A*< 11 ) - ME TORNARIA MAIS CAUTELOSO EM MINNAS CONVERSAS COM 
ELE PARA EVITAR QUE TAL ASSUNTO VOLTASSE A BA I LA 
E PREJUDICASSE AINDA MAIS O NOSSO RELAC I NAMENTO 
B»< 11 > - DIRIA A ELE QUE NOSSO RELAC I ONAMENTO ESTA SENDO A- 
FETADO PELA CONTROVERSIA SOBRE REFERIDO ASSUNTO 
E SUGERIRIA DISCUTI-LO ATE QUE O MESMO FOSSE RE- 
SOL VI DO 
DX < 1 1 » - A 



P« < 2 > - SE EU DESCUBRO QUE UM COLEGA DE TRABALHO COM QUEM TIVE 
UMA DISCUSSAO ACIRRADA EM PASSADO RECENTE PASSA A 
FALAR MAL DE MIM A TODOS OS OUTROS E A DEMONSTRAR 
SEMPRE MA VONTADE EU 

A*< 2 > - NAO CHAMARIA ATENCAO SOBRE O SEU COMPORTAMENTO COM 
RECEIO DE PIORAR AS COISAS E DEIXARIA QUE O TEMPO 
CUIDASSE DE TUDO 

B*< 2 > - COMENT ARIA COM ELE O SEU COMPORTAMENTO E PERGUNTARIA 
DE QUE MANE IRA ELE ACHA QUE NOSSA BRIGA NO PASSADO 
ESTA AFETANDO NOSSO RELAC I ONAMENTO 
DX < 2 > - 2 



P«< A > - SE NUMA DISCUSSAO COM COLEGAS A CONVERSA SE DIRIGIR A UM 
ASSUNTO ACERCA DO QUAL EU SOU 8UPOSTO DE SABER DEVIDO 
AS MINNAS QUAL IF I CACOES PROf I SSI ONAI S MAS QUE EM REA- 
LIDADE IGNORO TOTALMENTE EU 

A*( A > - TENTO DESVIAR O ASSUNTO PARA OUTRA DIRECAO ANTES QUE 
EU SEJA CHAMADO A OMITIR MINNA OPINIAO 
B»< A > - CONFESSO MINHA IGNORANCIA QUALQUER QUE SEJA A REACAO 
DE MEUS COLEGAS E ENCORAJO O CONT I NUAMENTO DA DIS- 
CUSSAO DO MESMO ASSUNTO 
DX < A > - A 

P»< 3 ) - SE UM DE MEUS COLEGAS TENTA ME DIZER QUE ELE ACHA QUE 
ESTOU FAZENDO COISAS QUE ESTAO PREJUDICANDO O MEU 
RELAC I ONAMENTO COM OS DEMAIS COLEGAS DE TRABALHO 

A*< 3 > - O ENCORAJAR I A A DESCREVER COM DETALHES MEU COMPOR- 
TAMENTO E A SUGERIR MANE IRAS PEL AS QUA IS EU PO- 
DERIA MUDAR 

B»< 3 > - TENTARIA LHE EXPLICAR TAO CLARAMENTE QUANTO POSSIVEL 
PORQUE ME COMPORTO DA MANE IRA QUE ELE DESCREVE 
DX < 3 > - 3 

■#•< - err - B £ HE a super roff almejasse uma posicao mais alta paiVa a ' 

QUAL EU PENSO QUE ELE NAO POSSUI AS QUAL I F I CACOES 
NE CESSAR I AS E TIVESSE SIDO CONVIDADO PELA ALTA DI- 
RECAO PARA TAL POSICAO EU 

A*< 6 > - NAO MENCIONARIA MINHA PREOCUPACAO NEM A MEU SUPE- 
RIOR IMEDIATO NEM A ALTA DIRECAO E DEIXARIA A 

ELES A TAREFA DE DECIDIR SOBRE O QUE E MELHOR 
PARA A ORGANIZACAO 

B*< 4 > - COMUN I CAR I A MINHA PREOCUPACAO . AO MEU SUPERIOR E A 
ALTA DIRECAO E ENT AO DEIXARIA A ELES QUALQUER 
DECISAO DECORRENTE DE MINHA INFORMACAO 

DX < & ) - * 

P*< 7 > - SE EU SENT ISSE QUE MEU SUPERIOR ESTA ME TRATANDO INJUS- 
TAMENTE EU 

A*< 7 > - LHE PERGUNTARIA SE EXISTE ALGUM PROBLEMA QUE ENVOL- 
VA A MINHA PESSOA E QUE EU DESCONHECO E PORQUE 
EU ESTOU SENDO INJUSTAMENTE TRATADO 
B*< 7 ) - NAO PERGUNTARIA NADA MAS F I CAR I A NA EXPECTATIVA DE 
QUE ELE ABORDASSE O ASSUNTO 
DX < 7 ) - 3 

P.( B ) - SE EU ESTIVESSE PREOCUPADO COM ASSUNTOS PESSOA IS E MEU 
SUPERIOR ME DISSESSE QUE EU ANDO ULTIMAMENTE MUITO 
IRRITADO CONSTANTEMENTE DISCUTINDO COM TODOS E BRI — 

GANDO PELAS MENORES COISAS EU 

A»< S > - DIRIA A ELE QUE ESTAVA COM ALGUNS PROBLEMAS PESSOAIS 
E QUE POR ISSO ANDAVA MUITO NERVOSO NO MOMENTO PE- 
LO QUE PREFER! A NAO SER AMOLADO 
B»< B ) - OUVIRIA SUAS RECLAMACOES MAS NAO TENTARIA EXPLICAR O 
PORQUE DE MEU COMPORTAMENTO 
DX < 8 > — 2 

P»( 9 ) - SE EU TIVESSE OUVIDO BOATOS E RUMORES SERIOS ACERCA DE 
UM COLEGA - ALGO QUE O PODERIA PREJUDICAR E SE O 
MESMO ME PERGUNTASSE SE EU SAB I A ALGO SOBRE O 
ASSUNTO EU 

A*< 9 ) - DIRIA QUE IGNORO TOTALMENTE O ASSUNTO E SUGERIRIA 
QUE ESQUECESSE A QUESTAO POIS NINGUEM IRIA ACRE- 
DITAR EM SEMELHANTE BOATO 

B»< 9 > - DIRIA A ELE TUDO O QUE OUVI QUANDO OUVI E 

DE QUEM O OUVI 
DX. < 9 » - A 

P»< 10 > - SE UM DE MEUS SUBORDINADOS ME DISSESSE QUE TENHO UM CON 
FLITO DE PERSONAL I DADE COM OUTRO FUNCIONARIO DE MEU 
NIVEL QUE TRABALHA EM OUTRO DEPARTAMENTO CUJA COOPE- 
RACAO E I ND I SPENSAVEL AO NOSSO EU 
A* < 10 ) - CONS I DERAR I A SEU COMENT A R I O TOTALMENTE DESPROPOS I TADO 
E DESENCORAJAR I A SUA REPETICAO NO FUTURO 
B»< 10 > - D I SCUT IRIA O ASSUNTO ABERTAMENTE COM ELE E PROCURARIA 

VER IF I CAR DE QUE MODO ESSE PROBLEMA ESTA AFETANDO O 
RENDIMENTO DO TRABALHO DO NOSSO DEPARTAMENTO 
DX< 10 > - 2 



I. ) - SE EU TIVESSE FORTES RAZOES PARA SUSPEITAR QUE UM BOATO 
MUITO SER IO A MEU RESPEITO ESTAVA CIRCULANDO ENTRF 
MEUS SUBORDINADOS E QUE UM DELES EU TENHO CERTEZA DE 
QUE CONHECE O ASSUNTO EU 

1* > - EVITARIA LEVANTAR A QUESTAO COM ELE E DEIXARIA A ELE 
QUALQUER INICIATIVA DE ABORDAR O ASSUNTO 
1* ) - ANRI SCAR I A COLOCA-LO NA PAREDE E LHE PERGUNTARIA 
DIRETAMENTE O QUE ELE SABE SOBRE O ASSUNTO 



P»< 13 ) - SE EU VI ESSE OBSERVANDO UM DE MEUS SUBORDINADOS E FOSSE 
DA OPINIAO QUE ELE NAO ESTAVA SE RELAC 1 ONANDO BEM 
COM SEUS COLEGAS DA MANE I RA MAIS EFICIENTE EU 
A*< 13 ) - MANTERIA MINHAS OPINIOES PARA MIM MESMO PARA EVITAR 
ESTAR INTERFERINDO COM COISAS QUE NAO SAO DE MINHA 
ALCADA 

B»< 13 > - ARRISCARIA SER VISTO COMO UM INTROMETIDO E LHE FALA- 
RIA SOBRE MINHAS OBSERVACOES E O QUE PENSO DELAS 
DX C 13 > - * 

P*< 14 ) - SE EU ESTIVESSE CONVERSANDO COM DO IS DE MEUS SUBROD I NA- 
DOS E UM DELES INADVERT I DAMENTE MENC I ONASSE UM PLANO 
DE ALGUNS EMPREGADOS QUE EU DECONHECIA E QUE VIRIA A 
AFETAR MEU DEPARTAMENTO EU 

A«< 14 > - OS PRESS I ONAR I A PARA OBTER MAIS INFORMACOES COM RES- 
PEITO A ESTES PLANOS E QUAL A OPINIAO PESSOAL DE 
CADA UM DELES 

B»< 14 ) - DEIXARIA A ELES A DECISAO DE CONTINUAR FALANDO OU NAO 
ACERCA DESTES PLANOS 
DX I 1 4 ) - 3 

P*I 17 > - SE MEU SUPERIOR DIRETO PARECESSE ESTAR SEMPRE PREOCUPAD 
O SE IRRITANDO COMIGO PELAS HINIMAS COISAS EU 

A«( 17 > - O TRATARIA COM LUVAS DE PELICA A PART I R DESTE MOMEN- 
TO POR ASSUMIR QUE ELE DEVERIA ESTAR COM ALGUM PRO- 
BLEMA PESSOAL QUE NAO E DE MINHA CONTA 
B»< 17 > - TENTARIA FALAR COM ELE O ASSUNTO E O DEIXARIA SABER 

QUE SEU COMPORTAMENTO ESTA AFETANDO NOSSO RELAC I O— 
NAMENTO 



P*< IB ) - SE EU COMECASSE A TER MA VONTADE COM MEU SUPERIOR IMEDI 
ATO E SENT ISSE QUE ISTO ESTAVA INTERFERINDO COM MINHA 
HABILIDADE DE TRABALHAR COM ELE DE UM MODO EFETIVO EU 

A*< IB ) - NAO LHE DIRIA NADA DIRETAMENTE MAS DEIXARIA SABER DE 
MEUS SENTIMENTOS DE OUTRAS MANE I RAS COMO P/EXEM- 

PLO TRATA-LO MAIS FRIAMENTE SO DISCUTIR NEGOCIOS 
ETC 

B*< IB ) - LHE EXPRESSAR I A DIRETAMENTE MEUS SENTIMENTOS E TENTA- 
RIA DIRIMIR NOSSOS PROBLEMAS DE RELAC I ONAMENTO PARA 
QUE VOLTASSEMOS AO TRABALHO 

DX< IB > - A 

P*< 19 » - SE EU ESTIVESSE DISCUTINDO COM UM DE MEUS COLEGAS MAIS 
SENS I VE IS SOBRE O SEU DESEMPENHO EU 

A*< 19 ) - EVITARIA ABORDAR OS SEUS ERROS COM RECEIO DE AFETAR 

O SEU MORAL 

B»< 19 ) - FOCAL I Z ARI A BASICAMENTE OS SEUS ERROS DE MODO A A- 

JUDA-I 4 a MELHORAR SEU DESEMPENHO 

DX < 19 > - A 

P»< 20 > - SE EU SOUBESSE QUE ESTAVA SENDO CONSIDERADO PARA UMA 
POSICAO SUPERIOR NA ORGANIZACAO E O MEU RELACIONA- 
MENTO COM MEUS ATUAIS COLEGAS VI ESSE DE IX ANDO MUI- 
TO A DESEJAR EU 

A»< 20 > - D I SCUT IRIA COM ELES MEUS DEFEITOS COMO PESSOA DE MO- 
DO A PODER ME MODIFICAR 

B»< 20 " > - TENTARIA ANAL ISAR MEUS DEFEITOS POR MIM MESMO DE MO- 
DO A PODER ME MODIFICAR 

DX < 20 > - 3 
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urns apiicacao oe PSICOLOGIA 
em MI CROCOMPUTADOR 



90 PRINTTA8( 15 ) ■ * E 

100 PRINTTABt 15f* 

110 PRINTTAB( 15 ) "* * * * 



10 CLS: PRINT! PRINT 

•20 PRINTTAB( 1 5 > “ * *******************" 

30 PRINTTABt 15) "* JANELA DE JOHARI *" 

40 PRINTTABt 15 ) "* *' 

50 PRINTTABC 15 ) •* uma apiicacao oe PSIC0L06IA *" 

60 PRINTTABt 15 ) *# em MI CROCOMPUTADOR *" 

70 PRINTTABt 15 ) " * *" 

80 PRINTTABt 15 ) '* Por! A. MACCrtI JR. & A. MACCHI III *■ 

90 PRINTTA8( 15) ** SALVADOR - BAHIA - MAI/Bi *" 

100 PRINTTABt 15 J "* Tone: <071) 248.13.87 *■ 

110 PRINTTABt 15)** a******************" 

120 ’ FOR I X=1 TO 1000: NEXT IX 

130 CLEAR 15000:0 IMPS (20) . A* ( 20) . 3S< 20 ) . DXt 20) . GS (58) . I* < 30) 

140 ’P*=" INFORMACOES * :GOSUB1000 : PRINT : PRINT : PRINT" INFORME POR FAVOR:" 

: PRINT: PRINT : PRINT : PRINTTABt 15 1 ’ SE UTILIZA DISCO DIGITE <D> SE CASSETE 
<C>" 

150 ’ R*=INKEY*: IFR*=" "THEN21 
160 ’ IFR*=-D*THENGO8UBU00:GOTO30 
170 ’ I F R*= * C * THENGOSUB 1 200 : GOT 030 
180 ’ G0T021 
190 GOSUB 1020 

200 P*=" INSTRUCOES ":GOSUB1000 : PRINT3832. STRING** 63. 95 >: PRINT391 0. “ D 
eseja Instrucoes <S>im <N>ao" 

210 Y*=INKEY»: PRINT3910. "Dese da Instrucoes <S>im <N>ao“ :F0RT=1T08:NEXTT 
220 IFY*=“N" THEN250 

230 IFY*="S"THENGOSUB1070 :GOSUB1340 :GOTO250 

240 PRINT3910. "Deseja Instrucoes < >im < >ao* :FORT=1TO8:NEXTT:GOTO210 
250 P*=" IDENTIFICACAO ":GOSUB1000 :PRINTa580. : : INPUT’OUAL 0 SEU NONE" ! 
N*:PRINT3644. I : INPUT'DATA (DD/MN/AA) ‘ !D* 

260 P*=" OUESTAO/RESPOSTA ■ :FORI7.= 1TO20 

270 CLS sGOSUB 1000 : PRINTIX I TABt 8) P*( 17.) :PRINT*<A>" |TAB<8> A* < I*/.) : PRINT" <3>" IT 
AB(8)BS( IX) 

280 GOSUB 320 

290 ON DX(IX) GOSUB 350 .370 .390 .410 

300 NEXT 17. 

310 GOTO 430 

320 PRINT3896.STRING*(62. 140) :A=0:B=0 

330 INPUT" PONTOS SUE ATRIBUE PARA <A>.<8> - NAO ESGUECA A+3=5 "lA.B 

340 IF A+B=5 THEN RETURN ELSEGOSUB1000 : °RINT3896> ■ PONTUACAO INCORRETA - TE 

NTE NOVAMENTE "i FORJ7.= 1TO500:NEXTJ7.: J7.= I7.:FORI7.=J7.TO20:GOTO270 

350 X=X+A 

360 RETURN 

370 Y=Y+3 

380 RETURN 

390 Y=Y+A 

400 RETURN 

410 X=X+B 

420 RETURN 

430 IFX<14THENAB=1 

440 IFX>13ANDX<20THENAB=10 

450 IFX>19ANDX<24THENAB=20 

460 IFX>23ANDX<27THENAB=30 

470 I FX>26ANDX<29THENAB=40 

480 IFX>28ANDX<31THENAB=50 

490 IFX>29ANDX<32THENAB=60 

500 IFX>31ANDX<35THENAB=70 

510 I FX >34ANDX <40THENAB=80 

520 IFX>39ANDX<47THENA8=90 

530 IFX>46THENAB=99 

540 IFY<17THENFB=1 

550 I F Y424AND Y> 1 6THENFB= 1 0 

560 IFY<27ANDY>23THENFB=20 

570 IFY<29ANDY>26THENFB=30 

530 IFY '31ANDY728THENF 3=40 

590 IFY <33ANDY>307HENFB=50 

600 I FY <35 ANDY> 32THENFB=60 

610 IFY<37ANDY>34THENFB=70 

620 IFY <39ANDY> 36THENF B=80 

630 I FY <42ANDY > 38THENF3=90 

640 I FY >4 1 TH£NF3=99 

650 GOSUB 1450 

660 CLS: PRINT315. *- JANELA DE JO.HARI-" 

670 PRINT381 . * oe : "IN* 

680 PRINT3145." > feedback >" ;FB!"X" 

690 PRINT3261 . "EU — >* I 
700 PRINT3308. * < — EU" I 
710 PRINT3323. "ABERTO" : 

720 PRINT3375. "CEGO" : 

730 PRINT35 12. "ABERTURA" 13578. ABl "7." 

740 PRINT3772. “EU -->*! 

750 PRINT3820. * < — EU" I 
760 PRINT3834. "SECRETO" : 

770 PRINT3B84. "DESCONHECIDO" ; 

780 FORK=25TO10i:SET(K,9) :SET<K. 40 ) :NEXTK 

790 F0RK=9T 040 : SET ( 25 . K ) :SET<26. K) : SET ( 100. K) : 3ET( 101. K) :NEXTK 
800 F0RL1 =25T0 1 00STEP4 : SET ( L 1 . ( A3* . 3 1 ) +9. 5 ) : SET ( LI * 1 . ( AB* . 3 1 ) +9. 5 > : NEXTL 1 
810 FORK1=9TO40STEP2 : SET ( <FS*. 755 >+25. K1 ) :SE7< (FB*. 755)+26.Kl ) :NEXTKi 
820 PRINT391 1 > " <0>utr o teste <I>mpressao <F>im” 

830 R*= INKEY* :PRINT3911."< >utro teste < >mpressao < >im" :F0RT=1T08:NEXTT 
840 I FR*= " 0 * THENAB=0 : FB=0 : X=0 : Y=0 : GOTO250 
850 IFR*=" I " THEN89B 

860 IFR*=*F’THENP*=" FlM DE ROTINA ■: CLS: GOSUB 1000 :L=896: PRINT3520. " Mu i t 
o obri9ado - foi um prater es+ar com voce. .." :F0RI=1T063: PRINT3L+I . CHR* ( 140 > 
: FORJ= 17020 : NEXTJ : NEXTI : C-S : RUN" MI CR0S1 S/BAS " 

870 IFR*=“F"7 HEN860 

880 IFR*=" "THENPRINT391 l . * <0>utro teste <I>mpressao <F>im" :F0RT=1T08:NEXTT 
:GOTO830 \ . 

890 PRINT391 1 . STRING*! 45. 32) : ’ ’ 

900 R*= INKEY* : PRINT3913. "Quanao impressora pronta < >* :F0R7=1T0B:NEXTT 
910 IFR*=" ?"THENLPRINTCHR*(27 ) I CHR* (28) :GOTO920 ELSEPRINT3913. "Ouando impre 
ssora pronta <P>" :FORT=1TO8:NEXTT:GOTO900 

920 G*( 1 )=" Representacao 9rafica da ’JANE-A DE JOHARI’ oe: "+N*:G*<2)=" 

> feed-bacx < * :GS(3)=STRINGS(40, ) :G*(50)=STRING*(40. ) 



J 0 ,H A R I 



930 F0RI=4T049:G*( I )=" *" +STRINGS( I NT ( FB*. 4 ) . 32) +* . “ +STRI NGSt 37-(F3*. 4 ) . 32) ♦“ 

*": NEXTI :G*(INT(AB*. 48) +2>="*"+STRING*< 38. ". ")+"**+• Abertura* 

940 LPRINTG*< 1 ) :LPRINT* • :L PRINTTABt 10)G*(2):LPRINT" * :LPRINT" “ 

950 F0RI=3T06:LPRINTTAB( 10)G*( I ) :NEXTI 

960 LPRINT“EU >" :TAB( 10)G*(7) l TABt 52) EU* :LPRINTTAB( 10)G*<8) :LP 

RINT" ABERTO" I TAB ( 1 0 ) G* ( 9 ) ;TAB(52)’ CEGO" • 

970 FORI=10TO46:LPRINTTAB( 10)G*( I ) : NEXTI :LPRlNT’EU > " ; TAB ( 1 0 ) G* < 47 > ; TAB ( 

52) *< EU" JLPRINTTABt 10)G*<48) SPRINT" SECRETO" I TABt 10)G*(49) : TAB (52)" 

DESCONHECIDO" :LPRINTTA3( 10)G*(50) 

980 LPRINT" ■ :LPRINTTAB(8> *Abertura=“ lABl "/. / Feea-back=" :FB: ”/. / em: “ID* 

990 GOTO820 

1000 CLS: PRINTCHR* ( i88 ) ISTRING* (5. 140 ) ? " JANeLa DE JOHARI ■ I STRING*! 38. 140 ) I 
CHR*( 188) :PRINTCHR*( 19l ) ISTRING*(6. 32) I "uma apiicacao de Psicolo9ia em Micro 
computador • :CHR*< 191 ) : PRINTCHR* ( 143) ISTRING*(38. 140) ; P*;STRING*( 5. 1 

40) I CHR* (143): RETURN 

1010 P*=" LEITURA EM DISCO ":GOSUBI000 

1020 OPEN" I " . 1 . "QUEJOHAR/TXT" :FORI=1TO20: PRINT3910. "LENDO OUESTAO NUMERO <"! 

Il"> DE 20 OUESTOES" : INPUT# 1 . P* ( I ) : INPUTH1 . A* ( I ) : INPUT# 1 . B* ( I ) : INPUT#1 . D7. ( I ) 

: NEXTI: CLOSE: RETURN 

1030 P*=" LEITURA OUESTOES ":GOSUB1000 : PRINT: PRINT: PRINT" Prepare Cassete:": 
PRINT3529. "Col oque Fita de Ouestoes e pressione <PLAY>" : PRINT3666. ■ Suando P 
ronto Digite <P>" • 

1040 P*=INKEYS: IFP*=" P" THEN1050 ELSE1040 

1050 PRINT3320. "Lendo Questoes " :PRINT3529.STRING*(45.32) : PRINT3666. STRI 
NG* (25.32): PRINT3832. STRING* (62. 140 ) : PRINT3896. * A Leitura oo artuivo oe «tu 
estoes demora cerca de 8 minutos* 

1060 FORI=1TO20: PRINT3529. “Questao numero <*»I5*> de 20 auestoes” : INPUTH-1 . P 
*( I ) : INPUT#-1 . A* ( I ) : INPUTH-l ,B*< I ) : INPUT#-1 . D*/.< I ) : NEXTI : RETURN 
1070 I* ( 1 )=" INSTRUCOES“+STRING* ( 53. 95 ) : I*(2)=" 1 . Serao apresentadas 20 situa 
coes e duas alternativas oe re-" 

1080 I * < 3 ) = " acao a estas situacoes." 

1090 I*(4)=”2. Voce devera indicar aual das alternativas mais se asseme-" 

1100 I * < 5 ) = " 1 ha a sua propria reacao ante aaueias situacoes." 

1110 I*(6) = “3. Se a a’.ternativa <A> oescreve exatamente a sua reacao. e" 

1120 I*(7)=" a <B> nao tern nennuma semelhanca com a sua propria rea-" 

1130 I*(E)=" cao. entao atribua 5 poncos para <A> e 0 pontos para <B>“ 

1140 I*(9>=* ou ao contrario se a sua reacao for tiPicamente a oescrita* 

1150 I*<10)=" em <B>. * 

1.60 I*tll)=“4. Se <A> oescreve oe modo bem aproximaoo o seu comportamen-* 

1170 I*(12)=" to e <B> tern al9uma semelnanca com a rua reacao. entao a-” 

1180 I*(13)=“ atribua 4 pontos para <A> e 1 ponto para <B>. 

1190 I*< 14)=STRING*(63.95) 

1200 I*(15)="Para continuar oigite pualguer tecla" 

1210 I*( 16)=I*( 1 ) 

1220 I*(17) = "5. Se <A> e <B> sao seme 1 hantemente corr esponoen tes a sua* 

1230 I*(18)=" propria reacao. porem <A> e 1i9eiramente mais proximo oe” 

1240 I*(19)=" sua forma de a9ir. atribua 3 pontos para <A> e 2 poncos" 

1250 I*(20)=" para <B>. * 

1260 I*(21)="6. Sempre a soma oos pontos atnbuioos a caoa ai ternativa* 

1270 I*(22)=" devera ser 5 e nenhuma Puestao podera ficar sem resposta.* 

1280 I* (25 ) “STRING* (63.95) 

1290 I*(26)=“ <R>epetir instrucoes <P>rosse9uir" 

1300 I*(27>=" < >epetir instrucoes < >rosse9uir" 

1310 I*<23)="7. Procure responder como voce a9ina em cada situacao e“ 

1320 I*(24) = " nao como pensa aue sena certo a9ir..." 

1330 RETURN 

1340 CLS:F0RI=1T015 

1350 PRINTI*< I ) 

1360 NEXTI 

1370 Y*= INKEY* : IFY*=“ ” THEN 1370 
1380 CLS: FOR I =167024 
1390 PRINTI*< I ) 

1400 NEXTI : PRINT3832. I* (25 ) 

1410 Y*= INKEY* : PRINT3896. I*(26) :F0RT=1T08:NEXTT 
1420 IFY*=" R*THENGOTO1340 
1430 IFY*=" P" THEN250 

1440 PRINT8896. I* ( 27 > :F0RT=1T08:NEXTT :GOTO1410 
1450 CLS: P*=" INTERPRETACAO ":GOSUB1000 

1460 PRINT* 1. 0 Grafico demonstrara a ABERTURA e FEED-BACK.* 

1470 PRINT*2. ABERTURA representada pela linha -aue divide o 9rafico em" 

1480 PRINT" uma parte superior e outra inferior, apresenta na parte” 

1490 PRINT" superior aauiio aue VOCE SABE aue OS OUTROS SABEM DE VOCE." 

1500 PRINT" e na parte inferior aauilo aue VOCE PENSA aue os outros" 

1510 PRINT" NAO SABEM SOBRE VOCE." 

1520 PRINT“3. FEED-BACK representado pela linha aue divide o 9rafico em" 

1530 PRINT" duas partes laterals, apresenta na parte esaueroa aauilo" 

1540 PRINT" aue VOCE SABE a seu repeito e do lado direito aauilo aue" 

1550 PRINT* Voce DESCONHECE sobre si mesmo. * 

1560 PRINT3832. STRING* (63. 95 ) 

1570 PRINT3900. "Para prosse9uir di9ite aualauer tecla* 

1580 Y*=INKEY*: IFY*=" "THEN1580 
1590 CLS: GOSUB 1000 

1600 PRINT"4. Com o tracado das linhas de ABERTURA e FEED-BACK sobre’ o" 

1610 PRINT" 9rafico. este fica dividido em 4 partes:* 

1620 PRINT" 1. EU PUBLICO ou ARENA aue representa aauilo aue voce saoe" 

1630 PRINT" soore si mesmo e aue os outros tamoem saoem. " 

1640 PRINT" 2. EU CEGO aue representa aauilo aue os outros percebem mas" 

1650 PRINT" voce nao ve soore si mesmo." 

1660 PRINT" 3. cU OCULTO aue representa aauilo aue voce saoe sobre si" 

1670 PRINT* mesmo mas aue os outros nao saoem." 

1680 PRINT" 4. EU DESCONHECIDO aue representa aauilo aue nem voce nem os* 

1690 PRINT" outros sabem soDre Voce. " : PRINT3832. STSING*<63> 95 ) : PRINT390 

B.’Para prosse9uir digite aualauer tecla” 

1700 Y*= INKEY*: I FV*=” "THEN 1700 

1710 GOSUB 1000 :PRINT:PRINT:PRIN7: PRINTTAB ( 10 ) "E atraves de seu ’EU PUBLICO’ 
ou ’ ARENA’ " 

1720 PRINTTABt 10) "aue se reaiizam seus reiacionamentos pessoai s. ": PRINT: PRIN 
TTABU0) "Quanto maior sua area maior seu relacionamento. . . " 

1730 PRINT3832. STRING* (63. 95 ) : PSINT3900. “Para =rosse9uir digite aualauer tec 
la" 

1740 Y*=INKEY*: IFY*=" "THEN1740 ELSE RETURN ■ 
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CONTACMATIC £ um limpador especifico 
para equipamentos eletronicos. CONTAC- 
MATIC cont6m Freon TF, que deixa conta- 
tos, reles, seletores de canais, cabecas mag- 
neticas de computadores e gravadores, me- 
canismos de precisao, maquinas de calcular. 
relogios e muita coisa mais, limpo, limpo, co- 
mo novo! 

Para melhor manutencao: 

COOLERMATIC, congelador de circuitos pa- 
ra facilitar a localizacao de defeitos intermi- 
tentes em circuitos eletronicos (aerosol 
200 grs.). 

ISOMATIC, laca para proteger e isolar circui- 
tos impressos contra oxidacao (aerosol 
1 50grs.|. 

SILIMATIC, lubrificante seco a base de silico- 
ne para equipamentos eletronicos e de preci- 
sao. Repele umidade e protege contra oxida- 
cao (aerosol 200grs.). 

THERMATIC. pasta termica para dissipar ca- 
lor em componentes eletronicos. Aumenta a 
condutibilidade termica entre o dissipador e o 
semi-condutor (embalagem de 15 grs., 
1 0Ogrs. ou a granel). 

A VENDA NAS LOJAS DO RAMO 
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Devido ao grande numero de cartas de leitores pedindo 
maiores explicates sobre o pro grama “Aer oporto 83", 
publicado em MICRO SISTEMAS n9 22, estamos fazendo 
um MS RESPONDE especial para tentar resolver as duvidas 
mais comuns apresentadas por nossos leitores. 



Tira-teima : Aeroporto 83 



0 programa Aeroporto 83 foi pu- 
blicado com o objetivo de introduzir o 
leitor de MICRO SISTEMAS nadigita- 
gao de listagens em Assembler. Tive- 
mos cuidado na construgao da I6gica e 
apresentapao, tanto na parte de BA- 
SIC quanto na de Assembler. Por6m, 
surgiram diversas duvidas de leitores 
com relapSo ao processo de digitapao 
e teste do programa. Tentaremos ago- 
ra esclarecer as duvidas mais comuns 
que recebemos, mas o leitor deve ter 
em mente que 6 fundamental a leitura 
atenta do texto que acompanha o pro- 
grama para ter a compreens2o necess^- 
ria para digitcl-lo. 

Antes de mais nada 6 preciso desta- 
car que o programa Aeroporto foi 
exaustivamente testado pela equipe do 
CPD de MICRO SISTEMAS, receben- 
do especial ateng2o por ser o primeiro 
programa em Assembler especialmente 
escrito e veiculado por uma publicagao 
nacional. Todas as listagens, inclusive 
os blocos em Assembler, foram com- 
postos exatamente iguais ao modo co- 
mo serao listados pelo computador. 
Isso foi feito para dar maior seguranpa 
na digitapao, principalmente para os 
iniciantes. Por isso, se a imagem do vf- 
deo nao coincidir com a listagem pu- 
blicada, 6 porque houve erro na digita- 
pao. 

0 primeiro passo para obter os re- 
sultados desejados 6 digitar a listagem 
1. Nela existem algumas linhas REM 
que foram utilizadas para reservar es- 



pago para a parte em Assembler do 
programa. 0 procedimento 6 bastante 
simples: digite 1 REM e 82 caracteres 
1. A linha 1 ficarci assim: 

1 REM 11111111111111111111111 
11111111111111111111111111111111 
111111111111111111111111111 

Repita este procedimento nas linhas 
de 2 a 7, respeitando as quantidades de 
caracteres entre parenteses. Essas li- 
nhas correspondem aos blocos de 1 a 
7 das listagens em Assembler. 

As linhas 130, 510 e 540 correspon- 
dem aos blocos de 8 a 10 e nao fazem 
parte da rotina em cddigo de m^quina, 
mas representem a apresentap2o, os 
cr6ditos e o prdprio aeroporto. A t£c- 
nica de construgao das linhas 6 a mes- 
ma utilizada anteriormente, ou seja, di- 
gitar 98 espapos entre as aspas da linha 
130 e assim pordiante (pode-se digitar 
qualquer carSter, pois o que importa 6 
a quantidade correta). 

As outras linhas s5o comuns e nao 
devem causar problemas de digitapao. 
A linha 1060 deve receber tr§s espapos 
entre as aspas; a linha 1110 deve rece- 
ber apenas um espapo. 

Quando terminar com a listagem 1, 
fapa o teste mencionado no texto do 
programa. Se o resultado fordiferente 
de 18129, £ MELHOR PARAR por- 
que o programa nao funcionarS. Pro- 
cure, entSo, localizar o erro da lista- 
gem (que muito provavelmente estar£ 



nas linhas REM), e somente depois que 
o teste coincidir com 18129 6 que vo- 
ce devera prosseguir. 

Digite RUN 1000 e quando o siste- 
ma perguntar ENDEREQO DO BLO- 
CO? digite o numero da coluna, d es- 
querda, no bloco 1 (16514), e ENTER 
(ou NEW LINE). Logo ap6s digite os 
bytes na forma explicada pelo texto. 
Os outros enderepos do bloco aparece- 
rao automaticamente e nao haverd ne- 
cessidade de dig it^-los. 

Se voc§ detectar algum erro de digi- 
tagSo, digite M que o sistema pedirS 
novo enderepo do bloco. Reinicie do 
ponto anterior ao erro. No final de ca- 
da bloco digite tamWm M para entrar 
com outro bloco. Se quiser interrom- 
per a execugao da entrada de dados, 
basta digitar S que o sistema parar^. 

A digitapSo dos bytes nos blocos 
em Assembler deve ser feita com o mS- 
ximo de cuidado e atenp3o, porque 
qualquer erro sera fatal para a execu- 
pao do jogo. 

Quando terminar, inte/rompa a 
execup3o (digitando S) e tecle RUN 
2000. Agora d§ uma boa olhada na lis- 
tagem das linhas 1 a 540. As linhas 
REM receberam os cbdigos de m$qui- 
na do Assembler, e as linhas PRINT 
receberam apenas caracteres graficos 
que formam desenhos. 

O prdximo passo 6 eliminar as li- 
nhas 1000 a 2060 e digitar a listagem 
2. Grave o programa e, novamente... 
Feliz aterrissagem! 



Envie suas perguntas para MICRO SISTEMAS (Segao MS RESPONDE); 
Rua Visconde Silva, 25, Botafogo, Rio de Janeiro-RJ, CEP 22281. 
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Os principals centros comerciais 
do mundo tern como sua empresa oficial 
de exportagoes os Trade Centers. Dentro 
dessa nova filosofia do comercio inter- 
nacional, um grupo de empresarios cons- 
tituiu p BRASIL TRADE CENTER, 
COMERCIO E PARTICIPAgOES, 
baseado na estrutura dos seus similares 
dos grandes centros, a qual se acrescen- 
tou a dinamica do Banque DAffaire 
f ranees. A ideia principal desse Banco de 
Negocios, e, no exterior, vender Brasil 
e, dentro do Pais, fomentar o intercambio 
com o mercado internacional e oferecer 
uma serie de produtos e facilidades ao 
empresario e outras pessoas interessadas. 
Veja alguns exemplos: 




0 Banco de negocios. 




BRASILTRADE CENTER 

Av. Epitacio Pessoa, 280 (esquina de Visconde 
de Piraj4), Ipanema, Rio de Janeiro - RJ, 

CEP 22471, tels.: (021) 259-1299, 259-1499 e 259-1542. 



A BTC - Computadores e Video 
desenvolve e fornece programas 
aplicativos, cursos de BASIC (basico 
e avangado), entre outros, alem de uma 
completa assessoria em Informatica e da 
venda de maquinas, software e video, 




comercializa aparelhos de video-cassete, 

fitas, e possui atualmente o primeiro curso 

de Ingles em video-cassete produzido no 

Brasil, com um aprendizado divertido 

e eficiente. Tambem^^^^^^. 

encontram-se 

em desenvol- 

vimento diver- 

sos projetos de 

programas cultu- 

rais em videa 1 + 



A BTC - Viagens e Turismo 
promove viagens comerciais e 
turisticas, individuais e em pacotes, 
com toda a infra-estrutura dos maiores 
agentes de viagens (despachantes, 
passagens aereas, traslados, tours, 
hospedagem, etc.), incrementando o 
turismo interno e o intercambio com 
investidores estrangeiros. Realiza, 
tambem, tours de ensino 

e desenvolvimento em- 
presarial para 
estudantes e 
empresarios, visitan- 
do os maiores centros de In- 
formatica (fabricas e empresas, entre 
outros) dos Estados Unidos e Japaa 



BTC - Inc. Empresa Promogao e 
Comercializagao em Miami - 
Florida - EUA. O BRASIL TRADE 
CENTER funciona com telex interna- 
cional, banco de dados e recepcionistas 
bilingiies, com escritorios em Miami 
e no Rio de Janeiro, este localizado 
numa das mais valorizadas esquinas 
do Brasil e dotado de show-room para 
exposigao e langamentos de produtos. 
Visite-nos. Estamos a sua disposigaa 







ASSOCIAQAO DE REVENDAS — 

A ARCOS — Associagao das Reven- 
das Especializadas em Computadores do 
Rio Grande do Sul aprovou seus novos 
Estatutos, que tem como objetivos prin- 
cipals a coordenagao, protegao e repre- 
sentagao legal dos associados. 

A associagao elegeu tambem a nova 
diretoria, que ficou assim constituida: 
Presidente: Jose Eduardo Buchabqui 
(Advancing); Secretario: Paulo Roberto 
S. Dornelles (Digital); Tesoureiro: Luiz 
Carlos Drummond (Microtel); Vice-presi- 
dente: Felix S. Rosa Neto (BPI Informati- 
ca); Segundo Secretario: Antonio Cesar 
C. de Almeida (Metaldata); Segundo Te- 
soureiro: Jefferson Durand (Informatique). 
Integram o Conselho Fiscal Damlo R. 
Menezes, (DB Computadores). Tulio Cas- 
tro Filho (Microsis) e Luiz Antonio Noll 
(Compumidia). As empresas Alpha Siste- 
mas e Micromega irao representar a 
ARCOS. respectivamente. nas regioes da 
Serra e do Vale dos Smos. 




HP-85B, novo micro da Hewlett-Packard 



DISCO ELETRONICO 

Urn disco eletronico 100 vezes mais 
rapido que a fita e 15 vezes mais do que o 
disco magnetico e a novidade do HP-85B. 
recentemente langado pela Hewlett-Pac- 
kard do Brasil. 

Esse disco, que pode armazenar 32 
Kbytes mternamente e ate 160 Kbytes 
com a utilizagao de um modulo externo. 
constitui-se num espago de memoria que 
atua como um acionador de discos. 

O HP-85B. que esta sendo fabricado 
em Campinas — SP. pesa nove quilos e. 
a e'xemplo do seu antecessor, o HP-85A. 
langado no Brasil em 1981, incorpora 
teciado. video, impressora e umdade de 
fita magnetica, aiem de rodar todo o 
software disponivel para a linha 85. 



SINCLAIR X MICRODIGITAL 

Esta em fase de pericia, sendo anali- 
sado por tecnicos de ambas as partes, o 
processo movido pela Sinclair Research, 
fabricante dos microcomputadores ZX 80 
e ZX 81. contra a Microdigital. A mesma 
agao envolve ainda as empresas Filcres e 
Editelle. A Microdigital e a Filcres estao 
sendo acusadas pela Sinclair de terem 
copiado o teciado. circuito eletromco e 
software basico de seu microcomputador 
para seus equipamentos TK 82C e NEZ 
8000. respectivamente. A acusagao con- 
tra a Editelle se refere ao fato de esta ter 
publicado em sua revista fotos do dia- 
grama do equipamento fabricado pelas 
duas outras res. "identico ao modelo da 
empresa mglesa . segundo texto da agao, 
Segundo o advogado da Microdigital. 
Georges Fischer, a Sinclair nao requereu 
registro de patente de seu equipamento 
no Brasil em tempo habil. nao tendo por- 
tanto nenhum direito com relagao ao 
mercado nacional. Este sera o principal 
argumento da defesa. Quanto aos itens 
levantados pela Sinclair. Georges Fischer 
afirma que o teciado do TK 82C, como 
da maioria dosequipamentos.obedece a 
mesma disposigao dos teclados de ma- 
quina de escrever, e o circuito eletronico 
nao e patenteado em nenhum lugar no 
mundo. Com relagao ao software basico. 
o advogado da Microdigital afirma que os 
proprios tecnicos que foram fazer a busca 
e apreensao. ordenada pela Sinclair, ave- 
nguaram que os primeiros 12 mil passos 
sao iguais. mas os outros 4 mil sao dife- 
rentes. Alem disso, a defesa usara como 
argumento o fato de que no Brasil o soft- 
ware basico nao tem protegao legal, pois 
a propria lei impede que este seja prote- 
gido pela propriedade industrial. Por ou- 
tro lado ele e considerado como parte 
integrante da maquma. nao cabendo por- 
tanto ser defimdo exatamente como cria- 
gao cientifica. o que Ihe encaixaria na 
lista de produtos protegidos pelo direito 
autoral. 

Esta e a primeira agao do genero no 
Brasil e a decisao. a mvel de primeira 
instancia, devera sair ate o final deste 
ano. Segundo Fischer, o resultado desta 
agao podera ser essencial com relagao a 
atitude de outras empresas estrangeiras. 

Os advogados da Sinclair se negaram 
a dar entrevista pelo fato da questao 
estar sob judice. 



V J 

A P-500, DA PROLOGICA 

A Prologica acaba de langar a im- 
pressora P-500, projetada para compu- 
tadores pessoais, em especial o CP-500 e 
o CP-300. A P-500 e uma impressora ma- 
tricial com velocidade de 100 CPS. bidi- 
recional e percurso minimizado (escolha 
do caminho mais curto). A impressao 
dos caracteres e feita por meio de nove 
agulhas alinhadas verticalmente, forman- 
do uma matriz de nove colunas por nove 
linhas e seis colunas por doze linhas 
para caracteres graficos do CP-500. Exis- 
tem quatro tamanhos de carater: normal 
(80 caracteres/linha). normal expandido 
(40 caracteres/linha). comprimido (140 
caracteres/linha) e comprimido/expandi- 
do (70 caracteres/linha). 

SOFTWARE E 
ALTA RESOLUQAO 

A Digital Componentes Eletromcos 
Ltda.. de Porto Alegre, esta langando 
dois sistemas de alta resolugao grafica 
para a linha Sinclair, ambos permitindo 
45.056 pontos na tela (pixel de 256 x 176). 
O primeiro deles permite a criagao de n 
tipos de caracteres graficos. assim como 
letras maiusculas e minusculas de qual- 
quer alfabeto. inclusive o grego. O outro 
modelo ja vem com um leque de carac- 
teres. simbolos e letras gravadas em 
EPROM, que podem ser utilizados em 
qualquer programa. 

A empresa tirmou tambem contrato 
com as software-houses Inf initus e Mi- 
croline para a distribuigao nacional ex- 
clusiva dos programas das marcas Su- 
persoft. Inf initus e Microline. 

A matriz da Digital fica na Rua Barao 
de Tramandai, 204. Porto Alegre — RS. 
CEP 90000. tel.: (0512) 24-1411. 




SUPRIMENTO E COISA SERIA 

• Matenha o seu computador bem alimentado adquirindo produtos de qualidade consagrada. 

• Fita Magnetica: 600. 1 200 e 2400 P6s 



Discos Magnfiticos: 5 Mb, 16 Mb. 80 Mb etc. 

Diskettes: 5 1/4, e 8 Polegadas — Simples e Dupla Face 

ETIQUETAS PIMACO -PIMATAB 



Fita CARBOFITAS p/lmpressoras: Globus M 200 - B 300/600 

• Fita p/lmpressoras: Elebra, Digilab, Diablo, Centronicetc. 

• Cartucho Cobra 400 

• Pastas e FormuiariosContinuos. 



AV. PRESIDENTE VARGAS. 482 - GR. 207 - TELS. (021) 263-5876 - 253-1120 - RJ 
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ASSESPRO-RJ TEM 
NOVA DIRETORIA 



COMPUTERLAND NO RIO 




CLAPPY EM COPACABANA 



A Clappy Computadores e Sistemas 
acaba de inaugurar mais uma filial no 
Rio de Janeiro, desta vez em Copaca- 
bana. A nova loja, localizada na Rua Pom- 
peu Loureiro. 99. alem de comercializar 
microcomputadores da Microdigital. Pro- 
logica, Digitus, Dismac, Spectrum, Schu- 
mec. Hewlett-Packard e Softec (EGO), 
impressoras Elebra e Globus, e toda a 
linha de calculadoras programaveis da 
Texas e HP e seus acessorios. dispoe 
ainda de um andar inteiro de salas de 
aulas para treinamento. 

APLICATIVOS PARA PECUARIA 

A IACA — Consultoria e Planejamen- 
to Agropecuario esta comercializando 
um pacote de programas para o controle 
de produgao, reprodugao e saude animal. 
Esses programas. ha tres anos em teste 
e aprimoramento na Fazenda Pau D Alho- 
em Campinas — SP (veja MS n.° 21 . pag. 
52) sao facets de usar e, conforme expli- 
ca Willem A. Dutilh, diretor da IACA, o 
seu custo esta relacionado ao tamanho 
do rebanho e ao conjunto de programas 
apropriado para cada fazenda. 

O sistema e compativel com qual- 
quer micro que utilize sistema operacio- 
nal similar ao TRSDOS O enoerego da 
IACA e: Caixa Postal 327. Campinas— SP 
tels. : (0192) 51- 6194 e 39-3352. 



A Assespro-RJ empossou, dia 28 de 
setembro, a sua nova diretoria para o 
periodo 1983/85, e que esta assim cons- 
tituida: Presidente: Alexandre Lello Ma- 
chado (Suplius); Vice-Presidente Executi- 
vo: Ernani Duarte Pinheiro Junior (Pro- 
consul). Vice-Presidente Tecnico: Luiz 
Carlos de Sa Carvalho (SPL); Diretor Fi- 
nanceiro: Haroldo Medeiros Duarte (Me- 
todo); Diretor Secretario: Jorge Araujo 
(Apas). Diretor de Software: Sergio Wer- 
ner de Araujo. Diretor de Bureaux: Mar- 
cos Greuel (Cetil); Diretor de Empresas 
de Comercializagao: Francisco G. Morei- 
ra (Digidata), Diretor de Ensmo e Treina- 
mento: Alvaro Silva Neto (D.SJ.); Diretor 
de Entrada de Dados: Nelson Ichikawa 
(Resumo); Diretor de Desenvolvimento: 
Marcio Augusto Romeiro da Roza (Vic- 
tori Eletromca) 



Microcomputadores e peritericos oe 
diversas marcas; um videoclube com am- 
pla variedade de cartuchos de videogame 
e fumes em videocassete. departamento 
proprio de assistencia tecmca, software 
house para o desenvolvimento de pro- 
gramas especificos e certificado de ga- 
rantia por um ano, valido em tooo o Pais, 
para qualquer equipamento adqumdo na 
Oja. 

Com esses produtos e servigos. a 
Computerland maugurou, em fins de se- 
tembro. a sua primeira loja propria no 
Rio de Janeiro, situada no Centro Empre- 
sariai Rio Praia de Botafogo. 228 — Edi- 
ficio Argentina, loja 114 A nova loja 
eleva para 23 o numero de pontos de 
vendas da Rede Computerland em todo 
o Brasil, atraves de umdades proprias ou 
de loias autorizadas pelo sistema oe tran- 
quia 



STRINGS 



• A Telesp esta concluindo seus tra- 
balhos no sentido de viabilizar a utiliza- 
gao de microcomputadores, compativeis 
com TRS 80 e Apple, como terminals de 
Videotexto. Para isso e necessano que o 
equipamento tenha saida RS 232 C e 
seja ligado a um modem especifico para 
o sistema Videotexto. Com este material 
e mais o programa que transforma o 
micro em terminal videotexto, o usuario 
se apresenta entao a Telesp para ser 
cadastrado no sistema. 

• A Microlab, que celebrou a produ- 
gao das milesimas umdades de discos 
rigidos DM-90- e DM-448, esta nacionali- 
zando progressivamente esses equipa- 
mentos. ate o inicio do proximo ano, os 
indices de nacionalizagao deverao atin- 
gir. respectivamente. 64% e 89%. 

• A Computerland inaugurou no inicio 
de ouiubro a sua quarta loja propria, si- 
luaoo a Av oos Imares. 134. A nova loja 
oferece o conjunto complete de produ- 
tos comercianzados pela Rede Compu- 
teriand 

• A Brasitone Radio e Televisao, de 

Campinas — SP. desativou o seu setor 
de Informatica. 



• O Sistema 700. da Prolbgica, sera 
em breve utilizado para a elaboragao de 
textos em Braille. Para isso. o professor 
Antonio Zuffo, da Escola Politecmca da 
USP, esta desenvolvendo uma interface 
especial para permitir que o equipamen- 
to, acoplado a uma impressora P-700, 
possa transformar o alfabeto normal em 
Braille. 

• A Novel Print esta comercializando 
teclados flexiveis com contatos eletricos 
de toque suave, para serem usados em 
equipamentos. em substituigao aos te- 
clados mecamcos. Os novos teclados sao 
completamente vedados. impedindo a 
entrada de poeira, sujeira e umiaade Os 
teclados flexiveis podem ser usados em 
calculadoras, computadores pessoais. 
brmquedos. industria automobilistica e 
equipamentos de escritorio, cientifico e 
mecamco. 

• Com a inauguragao de suas fmais de 
Uberlandia (MG) e Petropolis (RJ). o Cetil 
— Processamento de Dados elevou para 
2b o numero de instalagoes proprias em 
10 Estauos da federagao Fora esses, 
mtegram a rede Cetil 23 bureaux creden- 
ciados 





Para voce que ainda esta em duvida se vale ou nao a pena quebrar a cabeqa 
para aprender Assembler, eis um pequeno exemplo que the incentivara bastante 



BASIC e Assembler : 
quem e quem no Apple 



Listagem 3 

10 FOR K = 768 TO 921 
20 READ A 
30 POKE K.A! NEXT 
40 DATA 32,88,252.169,176,141, 

38,7, 141,89,7, 141,90,7, 141,9 
1 ,7,133,0,169,0,133,1,133.2 
, 133,3, 133,4, 166, 1,232, 134, 1 
, 165, 1,201. 10,240, 11,24, 165, 
0, 101, 1, 141,88,7,76,29,3, 169 
,0, 133, 1, 165,0, 141,91,7, 166, 

2.232. 134.2.24. 165.0. 101.2. 1 
41,90,7, 165 

50 DATA 2,201,10,240,3.76,29, 

3. 169.0. 133.2. 165.0.141.90.7 
,166,3,232, 134,3,24,165,0, 10 
1.3, 141,89,7, 165,3,201,10,24 
0,3,76,29,3, 169,0, 133,3, 165. 
0,141,89,7, 166,4,232, 134.4,2 

4. 165.0. 101.4. 141.88.7. 165.4 

60 DATA 201,10,240,3,76,29,3,16 

9.0. 133.4. 165.0. 141.88.7.96 
70 CALL 766 

80 END 



BASIC 

Linhas 


ASSEMBLER 
Enderetjos $ 


OBSERVANCES 


10 


300 a 302 


Limpa a tela 


20 a 30 


303 a 310 


Zera o odometro 




311 a 3 1C 


Zera A,B,C,D; em BASIC ja 
iniciam zeradas 


40 a 70 


3 ID a 33B 


Varia as unidades 


80 a 110 


33C a 35A 


Varia as dezenas 


120 a 150 


35B a 379 


Varia as centenas 


160 a 190 


37A a 398 


Varia os milhares 



Figura 1 - Correspondencia entre as linguagens BASIC e Assembler do programa em 
demonstragao. 



Evandro Mascarenhas de Oliveira 



odos sabemos que, para serem 
entendidas pelo microprocessa- 

dor, as linguagens de compu- 

ta$Sb de alto nfvel necessitam ser traduzi- 
das para linguagem de baixo nfvel atra- 
vds dos interpretadores ou compilado- 
res, o que consome tempo no processa- 
mento de um determinado programa. 
Este mesmo programa escrito em lin- 
guagem de baixo nfvel, Assembler por 
exemplo, tern sua velocidade aumentada 
consideravelmente (na literatura consul- 
tada existe a referenda de, no mfnimo, 
oitenta vezes). 

Como curiosidade natural, propus-me 
a avaliar esta diferen 9 a a partir de dois 
programas identicos, um escrito em BA- 





Listagem 1 




10 


HOME 




: 20 


FOR K = 1SB0 TO 1883 




30 


POKE K. 176: NEXT 




40 


= A + 1 




50 


IF A = 10 THEN A = 0: POKE 


8 




83,176: GOTO 80 




60 


POKE 1863,176 + A 




70 


GOTO 40 




I SO B = B ♦ 1 




90 


POKE 1882,176 + 8 




100 


IF 8 = 10 THEN B = 0: POKE 


1 




882,176: GOTO 120 




I no 


GOTO 40 




120 


C = C s- 1 




130 


POKE 1881,176 + C 




140 


IF C = 10 THEN C = o: POKE 


1 




881,176: GOTO 160 




150 


GOTO 40 




j 160 


D = D + 1 




170 


POKE 1880, 176 + D 




180 


IF D = 10 THEN D = 0: POKE 


1 




880,176: GOTO 200 




190 


GOTO 40 




200 


END 





SIC e outro em Assembler, no micro AP 
II da Unitron, que usa o microprocessa- 
dor 6502. Ambos representam um odo- 
metro que vai de 0 a 9999, retoman do 
a 0, numa sequencia de 10.000 varia?5es 



indicadas na tela atraves das posi?6es de 
mapeamento de video (sem a utilizasao 
da instruct) PRINT). 

0 programa em BASIC (listagem 1) 
consumiu tres minutos ou 1 80 segundos 



Listagem 2 



0300- 


20 


58 FC 


JSR 


*FC58 


034F- 


4C 


ID 03 


JMP 


*031D 


0303- 


A9 


BO 


LDA 


**B0 


5352- 


A9 


00 


LDA 


#*00 


0305- 


3D 


58 07 


STA 


*0758 


5354- 


85 


02 


STA 


*02 


0308- 


8D 


59 07 


STA 


*0759 


5356- 


A5 


00 


LDA 


*00 


030B- 


8D 


5A 07 


STA 


*075A 


5358- 


8D 


5A 07 


STA 


*075A 


030E- 


8D 


5B 07 


STA 


*0758 


535B- 


A6 


03 


LDX 


*03 


0311- 


85 


00 


STA 


*00 


535D- 


EB 




I NX 




0313- 


A9 


00 


LDA 


#*00 


535E- 


86 


03 


STX 


*03 


0315- 


85 


01 


STA 


*01 


0360- 


18 




CLC 




0317- 


85 


02 


STA 


*02 


5361- 


A5 


00 


LDA 


*00 


0319- 


85 


03 


STA 


*03 


0363- 


65 


03 


ADC 


*03 


031B- 


85 


04 


STA 


*04 


5365- 


SD 


59 07 


STA 


*0759 


031D- 


A6 


01 


LDX 


*01 


0368- 


A5 


03 


LDA 


*03 


031F- 


E8 




I NX 




036A- 


C9 


OA 


CMP 


#*0A 


0320- 


86 


01 


STX 


*01 


036C- 


FO 


03 


BEQ 


*0371 


0322- 


A5 


01 


LDA 


*01 


036E- 


4C 


ID 03 


JMP 


*03 ID 


0324- 


C9 


OA 


CMP 


#*0A 


0371- 


A9 


00 


LDA 


#*00 


0326- 


FO 


OB 


BEQ 


*0333 


0373- 


85 


03 


STA 


*03 


0328- 


18 




CLC 




0375- 


A5 


00 


LDA 


*00 


0329- 


A5 


00 


LDA 


*00 


0377- 


8D 


59 07 


STA 


*0759 


032B- 


65 


01 


ADC 


*01 


037A- 


A6 


04 


LDX 


*04 


032D- 


an 


58 07 


STA 


*0756 


037C- 


E8 




I NX 




0330- 


4C 


ID 03 


JMP 


*031D 


037D- 


86 


04 


STX 


*04 


0333- 


A9 


00 


LDA 


#*00 


037F- 


18 




CLC 




0335- 


85 


01 


STA 


*01 


0380- 


A5 


00 


LDA 


*00 


0337- 


A5 


00 


LDA 


*00 


0382- 


65 


04 


ADC 


*04 


0339- 


SD 


5B 07 


STA 


♦075B 


0384- 


BD 


58 07 


STA 


*0756 


033C- 


A6 


02 


LDX 


*02 


0387- 


A5 


04 


LDA 


*04 


033E- 


E5 




I NX 




0389- 


C9 


OA 


CMP 


#*0A 


033F- 


86 


02 


STX 


*02 


038B- 


FO 


03 


BEQ 


*0390 


0341- 


18 




CLC 




038D- 


4C 


ID 03 


JMP 


*03 ID 


0342- 


A5 


00 


LDA 


*00 


0390- 


A9 


00 


LDA 


#*00 


0344- 


65 


02 


ADC 


*02 


0392- 


85 


04 


STA 


*04 


0346- 


8D 


5A 07 


STA 


*075A 


0394- 


A5 


00 


LDA 


*00 


0349- 


A5 


02 


LDA 


*02 


0396- 


8D 


5g 07 


STA 


*0758 


034B- 


C9 


OA 


CMP 


#*0A 


0399- 


60 




RTS 




034D- 


FO 


03 


BEQ 


*0352 













para ser rodado. Ja no que foi escrito 
em Assembler (listagem 2), o tempo foi 
reduzido para 0,40 segundos, ou seja, 
foi 180/0,40=450 vezes mais rdpido, o 
que vem demonstrar a extrema velocida- 
de com que sSo processados os progra- 
mas em linguagem de baixo nfvel. 

Desta comparafSo da para perceber 
a importanda que representa o Assem- 
bler para programas que necessitam de 
velocidades elevadas de processamento, 
tais como os famosos jogos eletronicos 



onde, apesar das instates serem pro- 
cessadas uma a uma, percebe-se clara- 
mente a independenda de movimentos 
entre as figuras, resultando em efeitos 
dinamicos notaveis. 

0 programa pode ser rodado em 
qualquer computador que tenha o 6502 
como microprocessador e interpretador 
BASIC. 0 Assembler podera tamMm ser 
carregado na memoria atravds do BASIC, 
conforme a listagem 3, onde as instru- 
95es DATA indicam, em decimal, os 



codigos hexadecimais das varias instru- 
?Ses da linguagem de baixo nfvel. 

A correspondencia entre as instru- 
?5es em BASIC e Assembler estd indica- 
da na figura 1 . ■ 



Evandro Mascarenhas de Oliveira d Medico, 
atuando nas 3 re as de Laboratdrio Ciinico e 
InstrumentagSo Mddica. E usuirio dos micros 
NE-Z8000 e AP II da Unitron. 




VOLTA AO MUNDO 
SEMESCALAS 

Agora voce ja pode ingressar num mundo fasciiiante. O mundo da 
informacao instantanea. via videolexlo. 

Para parlicipar dessa viagem fantastica. basta ligar seu 
microcomputador a am modem UP-1200/VTX da Parks. Utilizando a 
linha telefonica comum. ele permile ao seu micro livre acesso ao 
sislema de videolexlo da TELESP. aos sistemas "in house" sendo 
implanlados pelos bancos. e a quaisquer oulros que 
surjam no fuluro. 

Isso significa conhecer. sem escalas e no momenlo que voce 
desejar. ludo que aconlece por ai em materia de informacao: 
economia. finanqas. esporles. lazer, turismo, cambio e muilo mais. 
Um programa sem limites. 

O UP 1 200'VTX foi desenvolvido pela Parks exciusivamenle para o 
videolexto. Sua interface digital e simples, dispondo apenas dos 
circuitos essenciais para este fim. O que torna seu preqo bastante 
acessivel. inferior ao de muitos eletrodomesticos que voce ja 
possui. Alem disso. dispensa o aluguel de terminais especiais e a 
compra de adaptadores. contando com uma assistencia tecnica de 
primeira linha para garantir seu perfeito funcionamento. 
Reserve logo seu lugar nesta volta ao mundo. Ligue seu micro a um 
UP-1200 VTX da Parks e boa viagem. 

Uma viagem Parks pelo 
mundo do videotexto. 



PARKS - EQLTPAMENTOS ELETRONICOS LTDA. 

Sao Paulo - Rua Correa Vasques. 51 - Fone |OUI 572-7171 -Tlx (011)23141 • Porto Alegre - Av Parana. 2335 - Fone |05.12| 42-5500 -Tlx. [051) 1043 • Bclo 
Horizonte Av. AforisB Pena. 94 1 Fone' (031 1 226-5722 • Brasilia - CLS 104 - Blocn 1 - D - sain 1 1 7 - Fone (06 1 ) 2254)538 • Curitiba Rua Carlos lie Carvalho. 
1766 -Fone (041 1 232-1814 -Tlx (04 1)5406 • Recife -Av..’ Xorte. 1090 - Fone (08 1| 24 1-5309 e Av. Conselheiro Aguiar. 5025 -con|. 104 - Fones (081)325-2123 
e 325-2307 • Rio de laneiro - Av Rio Branco. 245 - s 2 102 - Fone (02 1 1 220-2149 • Salvador - Av Amaralina. 818 - sala 102 Fone (071 1 249-9744 e 247-6344 
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Fugindo do cinema, seres estranhos invadem o seu micro... Sa/ve-o, capturando os inimigosl 



Alien, o invasor 

Bruno Barasch 



ste jogo foi desenvolvido no D-8002 e roda nos mi- 
cros compativeis com o TRS-80, pois possui coman- 

dos para saida de audio. Ele consiste em capturar os 

alien lgenas que tentam pousar no seu micro. Isto 6 feito deslo- 
cando-se a palheta para a esquerda (digite 4) ou para a direita 
(digite 6); para parar, digite 5. 0 jogo termina quando os in- 
vasores atingirem a linha pontilhada, pois eles ficam todos em- 
pilhados um em cima do outro. 

Vamos as instances: toda vez que a maquina for desliga- 
da ou voce recarregar o programa, digite o numero 31819 ao 
aparecer READY? 



Voce poderd tamb^m ouvir uma musica toda vez que con- 
seguir salvar o micro dos invasores. Para isto, desligue o plug 
do EAR, aperte PAUSE, REC e PLAY, ligue a chave MONI- 
TOR (para ouvir o que estd sendo gravado) e ajuste o volume. 
Assim, quando o jogo terminar vocS ouvird a Marcha Fune- 
bre como forma de agradecimento! 

Bruno Barasch tem 17 anos e cursa a segunda sdrie do sag undo grau do 
Coldgio Rio Branco, em SSo Paulo. Fez curso de eletrOnica por corres- 
pond^ cia e ho/e ji desen volve programas para o microcomputador D- 
8000, instalado na industria de seu pai. 



Alien 



10 CLS : PRINT@>27 , "A LIE N" : PRINT@2 56 , " PARA DIREI 

TA DIGITE 4 " : PRINT : PRINT" PARA PARAR 

...DIGITE 5" : PRINT : PRINT" PARA ESQUERDA DI 

GITE 6 " : PRINT : PRINT : PRINTTAB ( 19)" * *BATA QUAL 
QUER TECLA**" : POKE 1 6527 , 78 : POKE 1 6526 , 33 

20 IFINKEY$=" "THEN20 

3 0 CLEAR 300: FORX= 20001 TO 20028: READO : POKEX , O : NEXT 

40 DATA 14,255,33,0,1,58,61,64,230,253,198,2,211, 
255,214,2,211,255,6,160,16,254,43,124,181,32, 
239,201 

50 RANDOM : CLS :C=1 5360 :CC=1 27: CX=1 :AL=1 :J=672:J$= 
STRINGS ( 6 , 131 ) : PRINT@640 , STRINGS ( 63,45 ) ; -.PRINT 
@J,J$ 

60 TE=TE+ 1 : FORT=OTO 1 : A$=INKEYS : IFA$=" "THENNEXTELS 
EIFAS=" 4 "THENF= 1 ELSEIFAS= " 5 "THENF=0ELSEIFA$=" 6 
"THENF=2 

70 ONFGOTOI 40 , 160 

80 H=C+CX+6 4 : K=PEEK ( H ) : IFK= 131 THEN 1 20ELSEIFK=4 5TH 
ENFA= 1 ELSEIFFA= 1 THEN 1 30ELSEIFK-< >3 2THEN 1 1 0 

90 POKE20020 , 4 :X=USR( 0) :0=0+2 : IFPEEK ( C ) =45THEN1 00 
ELSEIFPEEK (0 = 131 THEN 1 OOELSEPOKEC , 32 

100 C=H : POKEC , CC : GOTO60 

110 AL=AL+ 1 : C=RND ( 64 ) + 1 5 359 : CX=RND ( 3 ) - 1 :GOTO60 



120 P=P+1 : POKEC ,42: POKE20020 , 30 : X=USR ( 0 ) :POKE2002 
0,50: X=USR ( 0 ) : POKEC , 32 : GOT0 1 10 
1 30 POKE20020 , 4 : X=USR( 0 ) : 0=0+2 : FA=0 : IFPEEK ( H ) = 1 27 
THEN1 70ELSEPOKEC , 45 :GOTO60 
140 IFJ<642THEN150ELSEPRINT@J," " ; : J=J-2 : PRI 

NT@J+6 , " — " ; :PRINT@J,J$; :GOTO80 
150 F=0 :GOTO80 

160 IFJ >696THEN 1 50ELSEPRINT@J , " ";:J=J + 2:PRI 

NT@J - 2 , " — " ; :PRINT@J,J$; :GOTO80 
170 GOSUB2GO : PRINT@256 , " POUSARAM"AL"ALIENIGENAS D 
URANTE " TE "UNI DADES DE TEMPO" : PRINT" VOCE PEGOU 
"P" INIMIGOS " : PRINT : PR I NT "QUER JOGAR NOVAMENTE 
( S/N ) " 

180 A$ = INKEY$ : I FAS = " " THEN 1 8 0ELSEI FA$ = " S " THEN 3 0 ELS 
EIFA$="N"THEN 1 90ELSE1 80 

190 PRINT@960, ; : FORW= 1TO 1 6 : PRINT : FORH=0TO20 : NEXTH 
: NEXTW : END 

200 FORX= 1 TO 2 3 : READM : IFM=0THEN2 1 0ELSEPOKE20020 , M : 
G=USR ( 0 ) : NEXT : RETURN 
210 FORH=OTO 1 5 : NEXTH : NEXTX 

220 DATA 99, 0, 0, 99, 0, 0,99, 9 9j 0,0, 84, 0,0, 88, 88, 0,0 
,99,99,0,0,104,99 
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A Remtronic 2000 
e uma maquina de 
escrever eletronica 
Introdu^ao tao avangada, mas 

automdtica tao avangada, que 

do papel consegue ser mais 

simples que a sua maquina 
de escrever. 

Qomo e que pode? 

E que a Remtronic 2000 
e o resultado da mais 
revolucionaria tecnologia 
Remington, que veio tomar 
o trabalho da secretaria 
mais f&cil, pratico e rapido. 
A Remtronic 2000 faz coisas 
que voce nem imagina. 

• Ela coloca 

automaticamente o papel na 
-i posigao inicial da 
escrita. 

B * Faz o alinhamento 
automatico 
a margem direita. 

• Gragas ao sistema 
de "margarida" 
Tabuiador decimal intercambiavel, 

automatico voce pode trocar de 



tipos sem sujar as 
maos e sem perder tempo. 

• A Remtronic 2000 e a 
unica que tem em seu 
cartucho a fita de 
impressao e a fita corretiva, 
que ja vem embutida. 

• Voce pode 
escolher entre 
4 formas de 
escrita: normal, 
negrito 

Sublinhado 

simultaneo sublinhado , 

ou neg rito sublinhado. 

E o sublinhado e 
simultaneo. 

• Ela pode apagar 
automaticamente uma linha 
inteira. 

• Seus dedos podem ser tao 
ageis quanto 
seu raciocinio, 
que a 
Remtronic 
acompanha. 

Negrito * veloz 

automatico Como um 




Tecla de 
repeti9ao 




Tecla 

polivalente 



pensamento, pode 
bater ate 17,5 
caracteres por 
de segundo! 

tao • Tem memoria de 

elefante. Sabe de 
cor todos os ajustes que 
voce fixou. A Remtronic 
2000 tem tanta novidade, 
mas tanta novidade, que 
nao di. pra contcir aqui. 
Mas a melhor delas 4 que 
agora ela tambem podera 
ser usada como 
terminal de 
computador, com o 
uso de um interface 
apropriado. 
Remtronic 2000. 
a Tao completa. Tao 

ente Simples, f i ■ 





A POLIVALENTE DA 
REMINGTON. 





GARDEN 








Aponte seu "canhao" diretamente para onde 
se escondem aquelas "figurinhas" e... fature o DXCC\ 



Radioamador: oriente-se, 

macanudo! 

Roberto Quito de Sant'Anna 



programa aqui apresentado 6 
mais urn exemplo de utilizafao 
do microcomputador no shack 
do radioamador, e serd de grande utili- 
dade para todo aquele que dispuser de 
um micro e de uma antena direcional, 
quer seja um emerito ca 9 ador de DX ou 
um simples batedor de papo que goste 
de aproveitar as melhores condi?6es de 
propaga^io para uma determinada re- 
giao do mundo. 

0 objetivo e fornecer, a partir do lo- 
cal onde se encontra a estagao, os azi- 
mutes e as distances sobre os caminhos 
curto e longo (short path e long path ) 
para lugares prefixados na memoria, a 
criterio do operador, ou para qualquer 
lugar do mundo dado por suas coorde- 
nadas geograficas (latitude e longitude). 

Embora desenvolvido em BASIC-dis- 
co em um CP-500, o programa funciona- 
ra diretamente em qualquer outro micro 
compativel com o TRS-80 modelo III, 
com ou sem discos, e, com maiores e 
menores modifica 9 oes, em qualquer ou- 
tro equipamento, inclusive no TK, NE e 
CP-200. Como se trata de um programa 
para radioamadores,^ virtualmente a pro- 
va de munhecadas: em caso de alguma 
entrada errada, voce sera convidado a 
repeti-la e, se tiver interface de audio,- 
vai receber um alerta sonoro suficiente- 
mente irritante para faze-lo prestar mais 
aten^o...! 

0 programa e auto-explicativo, inte- 
ragindo todo o tempo com o operador. 



Logo de inicio 6 apresentado um menu 
com duas op95es, devendo o operador 
digitar (sem necessidade de ENTER): 

• 1 — para locais prefixados; 

• 2 - para qualquer local; 

• CLEAR - para sair do programa. 

Na op 9 ao 1 , o programa pergunta se 
o operador deseja ver a rela 9 ao de locais 
dispomveis; em caso negativo, ou apos 
mostra-la em duas colunas, o programa 
apresenta o local de origem e suas coor- 
denadas, solicitando o nome do local de 
destmo — o qual de ve ser digitado exata- 
mente como aparece na relaqdo, sob pe- 
na de ser exigida nova entrada. Logo 
ap6s aparecem, na parte inferior da tela, 
os resultados desejados, ou seja, o azi- 
mute curto, a distancia curta, o azimute 
longo e a distancia longa. Na oppio 2, o 
programa apresenta o local de origem e 
suas coordenadas e pede a latitude do 
local de destino - convem notar que ele 
critica tais dados, nao aceitando latitu- 
des menores que -90° ou maiores que 
+90°, assim como longitudes menores 
que -180° ou maiores que +180°. Uma 
vez aceitos os dados, os resultados sao 
revelados exatamente como na op?ao 
anterior. 

0 programa esta estruturado em 
forma de modulos ou sub-rotinas, apre- 
sentando tdcnicas de programasao ela- 
boradas que merecem ser estudadas por 
iniciantes e jniciados. Em consequencia, 
o programa propriamente dito e consti- 
tuido apenas pelas linhas 170-180 op 9 §o 



1) e 200-210 (op 9 ao 2), as quais se limi- 
tam a chamar as sub-rotinas que, por sua 
vez, podem vir a chamar outras, num total 
de 1 1 (estas sub-rotinas precedent as li- 
nhas que contem os dados dos locais 
prefixados). Especial issima aten 9 ao deve 
ser dada as seguintes linhas: 

• linha 80 — o valor de N deve ser exata- 
mente igual ao numero de locais prefixa- 
dos (20, no caso). Para que caibam em 
uma so tela do CP-500, nao aconselho 
prefixar mais de 20 locais. Ver observa- 
nces sobre as linhas 930-960 adiante. 

• linha 110 — deve conter, exatamente 
na forma como aparecem, o nome (en- 
tre aspas) e as coordenadas (01 latitu- 
de, 02 = longitude) do seu local de ori- 
gem. 

• linha 510 — se voce nao dispoe de 
BASIC-disco, suprima a palavra LINE e 
conviva com um ponto de interrogate 
na tela quando o programa pedir o no- 
me do local de destino. 

• linhas 900-910 — se seu micro nao 
tern interface de audio ou se nao 6 com- 
pativel com o TRS-80 modelos I e III, 
estas linhas devem ser suprimidas junta- 
mente com a mstrunao GOSUB 910 das 
linhas 540 e 890, ou substituidas por al- 
guma rotina de audio de seu equipamen- 
to. 

• linhas 930-960 - nomes e coordena- 
das dos locais de destmo, que podem e 
devem ser de livre escolha do usudrio, 
mas que necessitam totalizar exatamen- 
te o N da linha 80; voce pode usar 
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quantas linhas de DATA quiser, com 
quantos locais por linha desejar, desde 
que a seqiiencia seja um nome (entre as- 
pas) seguido de dois valores (com ou 
sem sinal, conforme as coordenadas, e 
sempre na ordem latitude-longitude), 
todos separados por virgulas e que, repi- 
to, o total das trincas nome/latitude/lon- 
gitude nSb seja diferente de N. S6 para 
recordar, a latitude Norte e a longitude 
Oeste tern sinais positivos, ao passo que 
a latitude Sul e a longitude Este tern 
sinais negativos. 

ESCOLHENDO OS LOCAIS 

Na escolha dos locais prefixados, 
optei por regioes (Europa, Ilhas do Paci- 
fico etc.) e nao localidades especificas, 
obtendo as respectivas coordenadas sem- 
pre em valores inteiros e referidas a um 
ponto central ou dominante. Mesmo sa- 
bendo que tal escolha compromete o 
cdlculo da distancia (a qual, convenha- 
mos, 6 mera curiosidade...), convdm que 
os perfeccionistas nao se esque 9 am de 
que nao faz sentido levar ao mitesimo 
uma coordenada de destino se a nossa 
antena nao est£ rigorosamente orienta- 
da, se o nosso rotor tern folga no eixo, 
se o nosso indicador tern precisao de 5 
ou 10 graus e, principalmente, se desco- 
nhecemos o angulo de abertura de nossa 
antena. De qualquer modo, tais dados 
sfo de livre escolha do operador, e po- 
dem ser modificados a vontade. 

Se voce estiver interessado em obter 
azimutes e distancias de qualquer ponto 
do mundo para um dos locais prefixados 
ou entre dois pontos quaisquer — por 
exemplo, se durante um QSO o seu in- 
terlocutor lhe pedir calculos a partir de 
sua (dele) localizanao — experimente 
substituir a linha 1 10 por: 

110 INPUT "NOME LOCAL" ;PART$ : INPUT 

"LATITUDE" ;01 : INPUT "LONGITUDE" ; 02 

As formulas utilizadas foram adapta- 
das para uso em microcomputadores a 
partir das publicadas no ARRL Antena 
Book, edinao de 1977, pdginas 327 a 
329; as coordenadas foram extraidas do 
World Atlas, tambdm da ARRL, 119 
edi 9 §o. 

Com muita paciencia e um pouco de 
sorte, as figurinhas vao aparecer, tornan- 
do realidade o sonho do DXCC. Boa sor- 
te, macanudo! 



Roberto Quito de Sant'Anna — PY1DI/VM 4 
Engenheiro de Telecomunicapdes e Professor 
de In formin' ca da AM AN. Radioamador des- 
de 1965, 6 membro ativo de v&rias entidades 
radioamador (sticas nacionais e estrangeiras, 
destacando-se: LABRE, CWRJ, CWRL, DIG, 
CHC e AGCW-DL. 



Orient a <;ao de antenas e distancias 



PY1DWM-R0BERT0 QUITO DE SANTANNA 
BOX 24039 - 20522 - R JANEIR0-RJ 



: GOSUB 500 
:G0T0 80 



: GOSUB 570 



10 ' ========================================== 

20 '= ORIENTACAO DE ANTENAS E DISTANCIAS 

40 '= PY1DWM-R0BERT0 QUITO DE SANTANNA 
50 ' = BOX 24039 - 20522 - R JANEIR0-RJ 

60 ' ========================================== 

70 CLEAR 500 

80 CLEAR :N=20: DIM LUGS (N),A1(N>.A2(N) 

90 ' *****ATENCA0 ! *****ATENCA0 ! *****ATENCA0 ! *****ATENCA0 ! ***** 

100 'TR0QUE AS LINHAS 80 E 110, SE FOR 0 CASO - VER TEXTO 
110 PARTS="RIO DE JANEIR0":01=-23:02=43 '01=LATITUDE/02=LONGITUDE 
120 FOR 1=1 TO N : REA0 LUGS( I > , A1 ( I ) , A2( I ) : NEXT I 
130 CLS:ZS=STRING$<40," ") 

140 GOSUB 250 :F0R 1=1 TO 300:NEXT I:CLS 
150 ON IND GOTO 170 ,200 

160 '=======OPCAO 1======= 

170 GOSUB 400 :G0SUB 230 :GOSUB 500 
180 GOSUB 570 sGOSUB 740 :G0T0 80 
190 ' ======0PCA0 2====== 

200 GOSUB 230 : GOSUB 790 : GOSUB 570 

210 GOSUB 740 :G0T0 80 

220 ' ******SUBROTINA PARA CHAMADAS INICIAIS 

230 CLS: GOSUB 370 :LLS=PARTS:X1=01 :X2=02:G0SUB 480 : RETURN 

240 ' *****SUBROTINA DO MENU PRINCIPAL***!**** 

250 CLS: GOSUB 370 

260 PRINTS 19B, "VOCE DESEJA CALCULOS:" 

270 PRINTS 399, "1 - DO LOCAL DE ORIGEM PARA LOCAL PRE'-FIXADO" 

280 PRINTS 527. "2 - DO LOCAL DE ORIGEM PARA QUALQUER LOCAL" 

290 PRINTS 916, "<CLEAR> PARA ENCERRAR" 

300 PRINTS 804. “SUA OPCAO E'==> " 

310 ZZS=INKEY$: IF ZZS="" GOTO 310 

320 IND=ASC(ZZ$) :F0R K=1 TO 2:IF IND=4B+K GOTO 350 ELSE NEXT K 
330 IF IND=31 GOTO 970 
340 GOTO 310 

350 IND=IND-48:PRINTS 820, IND:RETURN 

360 ' *»***SUBROTINA PARA IMPRESSAO DO CABECALHO 

370 PRINTS 4, " ***** ORIENTACAO DE ANTENAS E CALCULO DE DISTANCIAS*****" 

380 PRINTS 68, STRING* < 55, "="): RETURN 

390 ' ***«*SUBROTINA PARA ORIGEM==>PRE'-FIXADD 

400 CLS: GOSUB 370 

410 PRINTS 132, "DESEJA VER RELACAO DE LOCAIS PRE ' -FIXADOS? S/N" 

420 ZZ*=INKEY* : IF ZZ*="" GOTO 420 ELSE IF ZZ*<>"S" AND ZZ*<>"N" GOTO 420 
430 IF ZZ*="N" RETURN 

440 CLS:GDSUB 370 :F0R 1=1 TO N : 11=1-1 :PRINTS 202+11*32, LUG* < I ): NEXT I 
450 PRINTS 980, "<ENTER> PARA CQNTINUAR"; 

460 ZZ*=INKEY*: IF ZZ«="" GOTO 460 ELSE IF ASC<ZZ*)<>13 GOTO 460 ELSE RETURN 
470 '*»«**SUBROTINA PARA IMPRIMIR ORIGEM 

480 PRINTS 196. "ORIGEM: ";LL*;“ (LATITUDE " ;X1 : "/LONGITUDE " ;X2; " ) " :RETURN 
490 '***»*SUBROTINA PARA ENTRADA LOCAL DE DESTINO 
500 PRINTS 334, "ENTRE NOME DO LOCAL DE DESTINO:" 

510 PRINTS 472, "" : :LINE INPUT NM* 

520 FOR 1=1 TO N : IF NM*=LUG*<I) GOTO 550 ELSE NEXT I 

530 PRINTS 334 , Z* : PRINTS 334, "NAO REGISTRADO: TENTE NOVAMENTE . . . " 

540 GOSUB 910 : PRINTS334 , Z* ; S472 , Z* : GOTO 500 

550 D1 =A1 ( I > :D2=A2< I >: RETURN 

560 ' •*«***«SUBROTINA DE CALCULOS******* 

570 PI=3.1415:P=PI/180:01=01*P:02=02*P:IF D1=0 THEN D1=D1+1 

580 01=D1*P:D2=D2*P:KM=111.12:DF=Q2-D2 

590 IF DF>PI THEN DF=DF-2»PI : GOTO 610 

600 IF DF<<-PI) THEN DF=DF+2*PI 

610 FI=ATN(C0S(DF)/TAN(D1 ) ) 

620 D=ATN(SIN(FI)«TAN(DF) /C0S< 01+FI ) ) 

630 IF SGN(DF ) =1 AND SGN(D)=1 GOTO 680 

640 IF SGN(DF )=-l AND SGN(D)=-1 THEN D=D+2*PI : GOTO 6B0 
650 IF DF=0 THEN IF 01>D1 GOTO 670 ELSE D=0:G0T0 680 
660 D=D+PI:G0T0 680 
670 D=PI 

68" DS=D/P :DL=DS+180: IF DL>=360 THEN DL=DL-360 
690 X=SIN(01)*SIN(D1) +C0S( 01 ) *C0S< D1 ) *COS(DF ) 

700 ANG=(-ATN< X/SQR <-X*X+l) ) +PI/2) /P 
710 SP=ANG*KM : LF’= ( 360-ANG ) *KM 

720 DS=INT(DS*10+.5)/10:DL=INT(DL*10+.5)/10:SP=INT(SP*10+.5)/10: 

LP=INT (LP*10+. 5 )/10: RETURN 
730 '***«*SUBROTINA DE IMPRESSAO DOS RESULTADOS 
740 PRINTS 576, STRING* ( 63, "*»") : PR I NT "AZIMUTE CURTO(GRAUS)=": 

DS, "DIST CURTA ( KM )=";SP 

750 PRINT : PRINT "AZIMUTE L0NG0< GRAUS )=" ;DL , "DIST LONGA(KM)=":LP 
760 PRINTS 909, "APERTE QUALQUER TECLA PARA CONTINUAR" 

770 IF INKEY*="“ GOTO 770 ELSE RETURN 

780 ' *****SUBROTINA PARA ENTRADA COORDENADAS DESTINO 

790 PRINTS 324. "ENTRE OS DADOS SOLICITADOS: " 

800 II=463:PRINTS II INPUT "LATITUDE DESTIN0";D1 
BIO IF Dl>90 OR Dl<-90 GOSUB B90 :G0T0 BOO 

820 II=527:PRINTS II,"";:INPUT "LONGITUDE DESTIN0":D2 
B30 IF D2>180 OR D2<-1B0 GOSUB B90 :G0T0 820 

840 PRINTS 576,STRING*(63, "=") 

850 PRINTS 910»"CONFIRMA DADOS? <S>IM ou <N>AO" 

860 X*=INKEY*:IF X*="" GOTO 860 ELSE IF X*<>"S" AND X*<>"N" 

GOTO 860 ELSE IF X*="N" GOTO 200 
870 PRINTS 9 10, STRING* <30, " "):PRINTS 610, "“: RETURN 
880 ' *****SUBRQTINA PARA COORDENADAS FORA DOS LIMITES 
890 PRINTS II, "FORA DO LIMITE - TENTE NOVAMENTE. GOSUB 910 : 

PRINTS II , Z* : RETURN 

900 ' *****SUBROTINA PARA ALERTA SONORO 

910 FOR T=1 TO 150:OUT 255,1:0UT 255,2:NEXT TrRETURN 

920 ' *****DADOS DOS LOCAIS FRE'-FIXADOS 

930 DATA "AFRICA DO SUL" , -30 , -25 , " ANGOLA" , -10 , -15 , "ANTARTIDA" , -75 , 70 . 

"AUSTRALIA", -30. -135, "CHINA". 30, -105 
940 DATA "EUA-COSTA LESTE" , 40 , 75 , "EUA-COSTA OESTE" , 40 , 1 20, "EURDPAV . 45 , 0 , 

" F AL KL ANDS " , -50 , 60 , "F I L IP I NAS ",15,-120 
950 DATA "FRANZ JOSEPH" , 80 , -50 , "GALAPAGOS" , 0 , 90, "GROENLANDI A" , 75 , 45, 

"HAWAII", 20, 165, "ILHAS DO CAR IBE" , 20, 75 
960 DATA "ILHAS DO PACIFICO" , -15 , 165 , " INDI A" , 15, -75 , "NIGERI A" , 10 , -5 , 

"NOVA ZELANDI A" , -45 , -165 , "PERU" ,-15,75 
♦>0 tND 
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Na segunda e ultima parte deste artigo, um passe io pel as rotinas e tab el as 
que const ituem o Sistema Operaciona! dosEquipamentos compatfveis com o ZX81 



0 Sistema Operacional 
do ZX81 ( II ) 

Renato Degiovani 



a primeira parte deste artigo, faldvamos sobre a rotina 
de inicializa5ao do sistema operacional e, como foi 

visto, quando o computador 6 ligado, as suas primei- 

ras a?5es s2o: estabelecer os parametros das varidveis do siste- 
ma (endere^s 16384 a 16508) e operar, no modo de edi?ao, 
at£ que uma tecla seja pressionada. Isto 6 feito pela opera^ao 
de uma das mais importantes rotinas do micro, que estd tam- 
Wm diretamente ligada com a produ^o da imagem no video. 
A figura 1 ilustra bem esse processo. 



Essa rotina e chamada Loop Principal do Display e seu fun- 
cionamento 6 bastante simples. Ela se inicia no endere90 553 
e termina no endere90 655, sendo que sua primeira fun9§o 6 
decrementar a varidvel FRAMES (endere90s 16436 e 16437). 
Se o bit 1 5, da varidvel FRAMES, for 1 , ent2o o micro esta em 
modo de edi92o/programa9ao. Se o bit 15 for 0, entao o siste- 
ma estri executando uma PAUSE e s6 saira da rotina quando 
FRAMES for igual a 0, ou se uma tecla qualquer for pressio- 
nada. Uma vez que o bit 15 Fica fora da decrementa9ao, o 
maior valor para PAUSE sera 32767 e qualquer valor acima 
desse n5o produzird a temporiza92o de PAUSE, pois o bit 15 
receberi o valor 1. Sendo assim, se PAUSE > 32767, isto 
provocar2 a paralisa^o do programa atd uma tecla ser pres- 
sionada. 



ordenar a sincroniza^o dos pulsos da imagem, etc., que irffo 
produzir, no Final, uma imagem na tela do video. 

0 que acontece quando o Loop Principal do Display en- 
contra uma tecla pressionada depende do modo como o sis- 
tema estd operando. A tecla pode ser um dado na edi9ao de 
uma linha de programa, pode ser um dado na execu9So de um 
programa ou pode, ainda, ser uma fun9§o de edi9ao (como os 
comandos do cursor) ou comandos diretos. A perfeita com- 
preensSo de como tudo isso se passa nSo 6 importante a nfvel 
da programa9So, em Assembler, pelo usudrio, mas 6 impres- 
cindivel o entendimento de certas rotinas e tabelas do inter- 
pretador, residentes nos 8 K de ROM, para que sejam viaveis 
mesmo as mais simples rotinas escritas por um programador. 

A partir daqui, faremos um passeio pelo emaranhado de 
rotinas e tabelas que constituem o Sistema Operacional do 
ZX, tra9ando, quando possivel, um paralelo com a progra- 
ma93o BASIC do micro. Apenas um aviso aos navegantes: os 
conceitos que serSo vistos podem, a principio, nao fazer mui- 
to sentido, ou se tomar incompreensiveis para a maioria dos 
iniciantes, mas com calma e paciencia 6 possivel desvendar al- 
guns mistdrios e aproveitar alguma coisa desse trabalho. 

MANEPULAQAO DE ERROS 



Ap6s repor o novo valor de FRAMES, no endere90 1 6436/ 
16437, a rotina do Display produz uma varredura do teclado 
a fim de identificar se ou qual tecla foi pressionada. Isso 6 fei- 
to pela sub-rotina chamada Scan Keyboard, que retoma com 
um valor atribuido a tecla em questao. Esse valor sera entao 
posicionado na variavel LAST-K (16421 e 16422) e a opera95o 
passa a ser dependente da tecla que foi pressionada. 

Se nenhuma tecla foi pressionada, ent2o a rotina executa 
algumas outras tarefas, como posicionar o Display para a TV, 



Todo programa est2 sujeito a uma s^rie de erros, desde a 
sua concep9fo at 6 a sua depura^o e teste final. Alguns podem 
ser de diffdl elimina^o e identifica9ao; logo, o programador 
que deseja atingir bons resultados deve se manter atento a pos- 
siveis falhas operacionais de seu sistema. Ocorre por^m que 
uma grande quantidade de erros origina-se, quase sempre, fora 
dos limites do sistema desenvolvido pelo programador e e ai 
que devem ser tornados os maiores cuidados durante uma 
programa^o. 
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O Sistema Operacional do ZX esta protegido contra os erros 
mais comuns da programa9ao em BASIC. Matriz mal dimensio- 
nada, valores fora de parametros preestabelecidos, arquivos 
sem nome em cassete, etc., produzem, quando detectados, 
uma resposta do sistema na forma de uma mensagem no canto 
inferior esquerdo do video, isto 6, erro/local onde ocorreu. 

Quando um programa em linguagem de maquina esta rodan- 
do, n2o se tern acesso a esse mecanismo, pois o Assembler atua 
diretamente sobre a UCP e n2o tern que ser interpretado an- 
tes de ser executado. Assim sendo, o programador deve redo- 
brar a sua aten92o quanto a possiveis erros. 

Podemos, por outro lado, utilizar alguns recursos do mani- 
pulador de erros do Operacional e o conhecimento, para tan- 
to, n5o 6 muitcr complexo. Quando um erro 6 detectado (por 
exemplo, PRINT AT 43,76; “P” - erro B) o programa que es- 
tava sendo executado 6 interrompido e 6 impressa a mensa- 
gem de erro B, na linha em que tal erro ocorreu. 

0 Interpretador BASIC utilizou um recurso definido numa 
das instru95es de RESTART do Z80 (mais precisamente a RST 
8) para esse procedimento. Quando a instru9ao RST 6 execu- 
tada, o byte que estiver logo apds o seu c6digo serd interpre- 
tado como o cardter do erro (mais 1) a ser impresso. Assim, CF 
OF corresponde a um erro G. Para testar a teoria basta gravar 
a instru92o a seguir numa linha REM, com alguns caracteres, 
seguida de RAND USR 16514: 



16514 CF 

16515 OF 



RST 8 
erro G 



ou 1 REM INT ? 



0 resultado dever2 ser G/0. 

0 manipulador de erros estd diretamente associado a varid- 
vel ERR-NR, cujo endere90 6 16384. Assim, se essa varidvel, 
que normalmente contdm o valor 255, receber qualquer outro 
valor, o Interpretador BASIC interromperd sua opera^o e 
acusard tal erro. Dessa forma, o resultado anterior (erro G) 



pode ser obtido, em BASIC, com POKE 16384,15. E preciso, 
no entanto, muito cuidado na defin^fo de novos cddigos de 
erro, pois alguns causarSo grandes problemas ao interpretador. 
As faixas de opera9ao do manipulador de erros encontram-se 
explicadas no manual do equipamento, na parte que trata das 
variaveis do sistema. 

impressAo no video 

A impressSo, no video, de uma listagem de programa, ou 
qualquer outra coisa, obedece a regras bem simples. Existe 
na RAM uma determinada area, ou quantidade de bytes 
(793), que recebe a designa^o de arquivo de imagem, ou seja, 
ali estao gravados todos os caracteres que aparecem no Display 
(ver artigo Pequenas memdrias, grandes economias — MS 22). 
Essa drea € im6vel e seu inicio e determinado pela variavel do 
Sistema D-File (endere90 16396 e 16397). As instru9des do 
BASIC que permitem escrever na tela da TV estao ligadas ao 
PRINT, que, em ultima ana'lise, n5o passa de um POKE dentro 
do arquivo de imagem. 

0 arquivo de imagem inicia com um carter 1 18 (ENTER) 
seguido de 32 caracteres por linha de impressSo e mais um ca- 
reer 118 para indicar o fim de cada linha, assim 24*33+1=793. 
Todo o segredo da utiliza^o do Display esta em manipuld-lo 
sem que os caracteres ENTER (118) sejam alterados, pois, se o 
forem, haveri tamanha confusao no Sistema Operacional que 
todo o conteudo da mem6ria tera que ser apagado. 

Em BASIC, podemos utilizar a instru9ao PRINT com todos 
os seus complements (AT, TAB, tabula9ao por virgula e 
ponto-c-virgula) para manipular o arquivo de imagens, ou en- 
tao a instru^o POKE. A linha de programa: 10 LET A=PEEK 
1 6396+256 *PEEK 16497 fard com que a variavel A receba o 
endere90 de inicio do arquivo de imagens, que 6 um cardter 
1 18. A linha 20 LET A=A+1 colocara a variavel A apontando 
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0 SISTEMA OPERACIONAL DO ZX81 

para a primeira posi?ao do video, ou seja: PRINT AT 0,0. 
Assim sendo, 30 POKE A, 50 e igual a 30 PRINT AT 0,0; “M”, 
com uma difere^a: a instruct) POKE 6 sensivelmente mais 
rapida do que a instru 92 o PRINT AT, pois o Interpretador 
BASIC nao tem que testar os parametros de linha e coluna. 
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01 


06 


0A 




LD BC , xxxxx 


C=coluna e B=linha 


16531 


CD 


F5 


08 




CALL 2293 


a serem impressas 
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40 




LD DE, 16514 




16537 


01 


OE 


00 




LD BC ,14 


■ imprime a string 


16540 


CD 


6B 


0B 




CALL 2923 




16543 


C9 








RET 


retorna ao BASIC 



Figura 2 



Toda essa mecanica do POKE pode ser reproduzida em 
Assembler e o resultado sera uma velocidade maior na exe- 
cugao. Vejamos entSo o programa em Assembler que substitui 
o em BASIC anterior. 

16514 2A 0C 40 LD HL, (16396) linha 10 

16517 23 INC HL linha 20 

16518 36 32 LD (HL),50 linha 30 

16520 C9 RET retorna ao BASIC 

Teste-o com: 1 REM E£RND7QMTAN (RND e TAN sao 
fun9(5es do BASIC) e RAND USR 16514. 

Outra grande novidade quando se trabalha com o Assem- 
bler, aldm da maior velocidade, 6 poder se omitir uma s^rie de 
testes e de parametros executados pelo Interpretador BASIC. 
Quando o sistema est i executando um PRINT, o procedimen- 
to 6 simplesmente carregar o acumulador do Z80 com o cara- 
ter a ser impresso e a seguir executar a instru 9 So RST 16. Isso 
ird corresponder a um PRINT carater. O programa Assembler 
a seguir ilustra essa caracteristica. 

16514 3E 32 LD A, 50 = 10 LET A=50 

16516 D7 RST 16 = 20 PRINT CHR$ A; 

16517 18 FB JR 16514 = 30 GOTO 10 

Teste-o com 1 REM YMNOT / CLS (NOT e CLS sao ins- 
tru95es do BASIC. Para obter CLS, apos digitar /, digite THEN 
CLS. Retroceda o cursor e elimine THEN). 

Para imprimir uma frase completa 6 necessario o conheci- 
mento da manipula 9 ao dos registradores internos do Z80. A 
rotina principal do PRINT deve ser manipulada em duas eta- 
pas: em primeiro lugar, estabelecer a posi 9 ao AT e, em seguida, 
apontar para a frase copiada. 

Vejamos entSo o programa da Figura 2, que corresponde em 
BASIC a PRINT AT 10,6; “MICRO SISTEMAS”. 

E importante salientar que a utiliza 9 ao do Assembler pres- 
supoe um perfeito dominio de sua programa 9 ao elementar, 
bem como o conhecimento da estrutura e da organiza 9 ao in- 
terna do micro. £ preciso nunca esquecer que quando se pro- 
grama em linguagem de maquina n3o se tem o Interpretador 
BASIC para auxiliar-nos em caso de erros e, frequentemente, 
nesses casos, todo o trabalho tera sido perdido. ■ 



Renato Degiovani i formado em Comunicagao Visual e Desenho Indus- 
trial pela Pontificia Universidade CatdUca do Rio de Janeiro. Hi mais 
de um ano utiliza microcomputadores para calculos na irea em que 
atua. 
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Filiada a ABICOMP. 




ANUNCIAMOS 0 FIM DO MICROCOMPUTADOR ISOLADO. 




m ■ 


j JIB 




















r 



Finalmente, o processamento de dados da sua 
empresa deixou de ficar limitado ao trabalho de 
estagoes isoladas. 

Os novos microcomputadores Dismac podem 
ser ligados entre si e a computadores de maior 
porte, compartilhando arquivos, impressoras e outros 
perifericos comuns. 

As mais variadas consultas podem ser feitas 
ao mesmo tempo, com rapidez e seguranga. 



E sua empresa pode entrar 
nesse sistema comegando pela 
configuragao mono ou 
multiusuario, pois o sistema Rede 
pode ir crescendo a medida das 
suas necessidades, expandindo-se 
ate 8 terminals inteligentes. 




I 



trabalhando com 16 microprocessadores de alto • 
desempenho e ate 576 Kbytes em CPU's 
independentes. 

Uma serie de aplicativos, especialmente 
desenvolvidos para o processamento distribuido, dao 
a sua empresa a agilidade operacional que ela precisa. 

Entre em Rede. 0 fim do microcomputador 
isolado. 0 comego das solugoes integradas. 

• Conhega tambem a linha de computadores 
pessoais Dismac 8100, compativel com Apple II Plus, 
nas lojas especializadas e revendedores em todo o Brasil. 

— — — “ — l 

Some ^ 

empresa ^ 

cargo ^ 



4* dismac 

Produtos da Zona Franca de Manaus 



• □ material explicativo 

I D demonstra^ao em seu 
show-room 




Manaus-R. Icci, n.° 1 0O - Distrito Industrial - F. (092) 237-2474 • Sao Paulo - Av. Marqu§s de Sao Vicente, n.° 600 - F. (01 1 ) 826-7 1 1 1 

Representantes em todo o territorio nacional. 








Sem coelhos e cartolas, este e um truque que vai deixar muita gente 
cismada (e so voce e seu micro saberao o segredo) 



0 Gran Mago Z80 

Jose Rafael Sommerfeld 



C ertamente voce algum dia ja foi 
a um circo e se encantou com 

aqueles truques maravilhosos 

apresentados pelo mdgico. Ou, mesmo 
que nao tenha ido a um circo, voce de- 
certo ')& assistiu a um show de magia na 
TV, teatro, em uma loja, na rua,enfim, 
alguma vez na vida voce ja deve ter sen- 
tido aquela sensagao estranha, entre cu- 
rioso e perplexo, parado defronte de 
uma cena que voce ere nao ser possivel 
mas que acontece, bem ali , diante de 
seus olhos. Pois agora chegou a vez de 
voce arrepiar seus amigos de espanto 
com seu magico particular: o microcom- 
putador. 



0 Gran Mago Z80 € um programa 
que deve ser executado na presenga de 
duas pessoas: voce e um amigo. Foi de- 
senvolvido no CP-200 da Prolbgica, po- 
dendo ser utilizado em qualquer equipa- 
mento da linlia Sinclair; e por nao se tra- 
tar de um programa complexo, podera 
rodar tamb^m em micros de outras fa- 



milias, mediante pequenas mudan 9 as. 



Voce e chamado de Mestre pelo Ma- 
go, e e desafiado a descobrir um numero 
que ele vai pensar. Se voce errar, o Mago 
lhe dard nova chance, mas se errar de 
novo ele absorvera seus poderes mdgicos 
e passara a comandar o espetaculo. A 
partir dai, seu amigo ird interagir com o 
Mago, o qual terd que adivinhar uma 
carta escolhida aleatoriamente pelo seu 
amigo em um baralho. 




Figura 1 - A carta marcada 



38 



MICRO SISTEMAS, novembro/83 



INSTALE O MODEM A217CT NO SEU MICRO 
UM SEGUNDO DEPOIS ELE VIRA TERMINAL 

DEVIDEOTEXTO. 




diversoes, dentro de sua casa. 

A CM A acaba de langar o Modem A217CT. O equipamento que faltava para fazer seu micro falar com o videotexto. 

Com o Modem A217CT e o seu telefone, voce tern acesso a todas as informagoes do videotexto: saldo da conta corrente, 
da poupan^a, curso de ingles, reserva de passagens, programagao da TV, noticias, congressos, feiras, galerias de arte, cinema 
e diversoes. Tudo aquilo que voce perderia horas procurando, chega a sua casa em apenas alguns segundos. 

O Modem A217CT e o caminho mais facil para seu micro falar com o videotexto: ele tern baixo custo, e compacto, 
voce mesmo instala e ja pode conhece-lo em qualquer distributor CM A. 




CM A 

Av. Giovanni Gronchi, 6065 - Vila Andrade - CEP 05724 - Sao Paulo - SP NOS ®twfOTD wm OS 
Tels.: (Oil) 548-2249 - 881-8166 - Telex (Oil) 30221 CMAS - BR tecnOlOgia em SeTVigO. 




OGRAN MAGO Z80 



CARTA 


INDICE 


SENHA 


AS 


1 


19 


DOIS 


2 


18 


TRES 


3 


17 


QUATRO 


4 


16 


CINCO 


5 


15 


SEIS 


6 


14 


SETE 


7 


13 


OITO 


8 


12 


NOVE 


9 


11 


DEZ 


10 


10 


VALETE 


11 


9 


DAMA 


12 


8 


REI 


13 


7 


NAIPE 


INDICE 


SENHA 


OURO 


1 


9 


COPAS 


2 


8 


ESPADA 


3 


7 


PAUS 


4 


6 



Figura 2 - Tabelas de indices e senhas 



0 TRUQUE 

Para entendermos bem o programa, 
vejamos primeiramente como funciona a 
m^gica com as cartas (este truque pode 
ser feito com qualquer baralho comum, 
excluindo-se os coringdes). Entregue o 
baralho a seu amigo e pesa-lhe que o 
embaralhe e corte a vontade. Abra-o em 
leque com os naipes para cima - sem es- 
quecer de explicar a seu amigo que se 
trata de um baralho comum, sem qual- 
quer sequencia ou ordem. Nesse mo- 
mento, voce deve procurar marcar a d£- 
cima carta (figura 1 ), pois ela sera a car- 
ta escolhida (cuidado na contagem, pois, 
se ao invds de voce marcar a ddcima vo- 
ce marcar outra, seu espetaculo ird por 
agua abaixo). Depois disso, feche o le- 
que e ponha o baralho, virado com os 
naipes para baixo, em cima da mesa. 

Pe^a para seu amigo pensar em um 
numero entre 10 e 20 e fazer um mon- 
te com o numero de cartas correspon- 
dente ao que ele pensou. £ importante 
que este monte seja feito passando-se as 
cartas uma a uma, de cima do baralho 
para baixo do monte, fazendo com que 
a primeira carta do baralho (de cima pa- 
ra baixo) passe a ser a ultima do monte, 
a segunda a penultima e assim por dian- 

Agora diga a ele para pegar a n® s * ma 
carta do monte (sempre com as cartas 
em cima da mesa e com os naipes para 
baixo), onde n sera igual k soma dos al- 



garismos que ele pensou. Exemplifican- 
do : digamos que o numero pensado seja 
17 (1 + 7 = 8 ). Como 17 6 igual a 8 , pe- 
9 a para ele pegar a oitava carta. Af en- 
tao voce faz um TCHAN-TCHAN- 
TCHAN-TCHAN e diz para ele (antes de 
virar, 6 claro) qual e essa carta. 

No nosso exemplo (figura 1) seria o 
oito de paus, pois seja qual for o nume- 
ro pensado entre 10 e 20 (exceto eles), 
o seu prdprio valor menos a soma de 
seu s algarismos sera sempre igual a 9, 
que sera tambdm o numero de cartas 
que sobrara nq monte quando seu ami- 
go pegar a n^sima carta, ou seja, a d£ ci- 
ma que voce havia marcado. Vamos 
comprovar: 



• 11 -* 1 + 1= 2; 11-2 = 9 

• 15 -*■ 1 + 5 = 6; 15 — 6 = 9 

• 19 -* 1 +9 = 10;19- 10 = 9 

O SHOW NO MICRO 

Vejamos agora como funciona a ma- 
gica no micro. No comeqo, o programa 
fica exibindo seu nome, esperando ins- 
truqOes para prosseguir - e 6 ai que vo- 
ce deve aproveitar para mostrar o bara- 
lho a seu amigo, marcando entao a ddci- 
ma carta. Depois disso, ao colocar o ba- 
ralho sobre a mesa, de andamento ao 
programa teclando S. O programa testa- 
rd seus poderes por duas vezes - e feliz- 
mente voce nunca ird acertar o numero 





Gran Mago Z80 


1 


REM GRAN MAGO Z-80 


230 PRINT AT 15,2; "SEUS PODERES 


2 


REM JOSE RAFAEL SOMMERFELD 


MAGICOS FORAM ABSORVIDOS PEL 


3 


REM CAIXA POSTAL 1709 


OS MEUS CIRCUITOS . " 


4 


REM CEP 24120 NITEROI 


235 PAUSE 120 


5 


REM PROFESSOR KASSIMIROS 


240 FOR 1=3 TO 28 STEP 4 


6 


REM TEL. 224-2235 


245 FOR Z=1 TO 10 


7 


REM ** MICRO SISTEMAS ** 


246 NEXT Z 


8 


DIM C$ (13,6) 


250 PRINT AT 19,1; "AH" 


9 


DIM N$ ( 4 , 6) 


260 NEXT I 


10 


LET X=4 


270 CLS 


11 


LET C$ ( 1) =" AS" 


280 PRINT AT 1,7; "AGORA E MINHA 


12 


LET C$ (2) =" DOIS" 


VEZ " 


13 


LET C$ (3) =" TRES" 


290 PRINT AT 4,0; "PENSE EM UM N 


14 


LET C $ ( 4 ) = " QUATRO " 


UMERO ENTRE 10 E 20" 


15 


LET C$ (5)="CINCO" 


300 PRINT AT 7,1; "SE JA TIVER P 


16 


LET C$ (6)=" SEIS" 


ENSADO TECLE " n S""" 


17 


LET C$ ( 7 ) =" SETE" 


305 IF INKEY|o"S" THEN GOTO 30 


18 


LET C$ (8) =" OTTu" 


5 


19 


LET C $ ( 9 ) = " NOVE" 


310 PRINT AT 10, 2; "AGORA PEGUE 


20 


LET Cl (10)=" DEZ" 


ESSE BARALHO QUE ESTA NA SUA . 


21 


LET C$ (11)=" VALETE" 


FRENTE E FACA UM MONTE COM O 


22 


LET Cl (12)=" DAMA" 


NUMERO DE CARTAS QdE VOCE HAV 


23 


LET C| (13) =" REI" 


IA PENSADO . " 


1 24 


LET N| ( 1) ="OURO" 


320 PRINT AT 16,3; "QUANDO TERMI 


1 25 


LET N | ( 2 ) = " COPAS " 


NAR TECLE ""S""" 


26 


LET N| ( 3) ="ESPADA" 


330 IF INK£Y|o"S" THEN GOTO 33 


27 


LET N|(4)="PAUS" 


0 


30 


PRINT , , " QUANDO ESTIVER AP 


340 CLS 


TO A 


ENFRENTARMEUS PODERES MAGIC 


350 PRINT AT 5,1; "AGORA PEGUE E 


OS TECLE " "S" " ." 


SSE NOVO MONTE E TIRE DALI A CA 


50 


IF X=21 THEN LET X=4 


RTA QUE OCUPA A POSICAO IGUAL 1 


100 


PRINT AT X, 8; "GRAN MAGO Z-8 


A SOMA DOS ALGA- RISMOS DO NUME 


0" 




RO QUE VOCE PENSOU" 


103 


PRINT AT X, 8 ; " 


360 PRINT AT 10,5; "EX : NUMERO 


" 




PENSADO =15" 


105 


LET X=X+1 


370 PRINT TAB 27; "1+5=6" 


110 


IF INKEY|o"S" THEN GOTO 50 


380 PRINT TAB 10; "PEGUE A SEXTA 


120 


CLS 


CARTA" 


130 


PRINT , , " PRIMEIRAMENTE TES 


390 PRINT AT 16,1; "QUANDO PEGAR 


TARE I OS PODE -RES MAGICOS DE MEU 


A CARTA TECLE ""S""" 


MESTRE SENHOR" 


400 IF INKEY|<> "S" THEN GOTO 40 


135 


PAUSE 180 


0 


140 


PRINT , , , , " DIGA POR FAVOR, 


410 CLS 


MEU MESTRE, QUALNUMERO ESTOU PEN 


420 PRINT AT 2,2; "AGORA OLHE PA 


SANDO . ,> , "DE 1 A 20" 


RA ESSA CARTA" 


150 


INPUT A 


430 PRINT TAB 8;"E CONCENTRE-SE 


160 


PRINT AT 13,4; "QUE PENA ... 


" i 


VOCE ERROU" 


440 PAUSE 180 


170 


PRINT AT 15,9-; "TENTE DE NOV 


450 PRINT AT 6,5; "ESTOU CAPTAND 


O" 




O ALGO" 


180 


PAUSE 180 


460 PAUSE 120 


190 


CLS 


470 PRINT AT 9,8; "VOU ADIVINHAR 


200 


PRINT AT 5,1; "DIGA-ME AGORA 


•1 


QUE 


NUMERO ESTOU PENSANDO . VOU 


480 PAUSE 120 


| LHE 


AJUDAR . , , ,"DE 1 A 10" 


490 PRINT AT 13,3; "A CARTA E " ; 


1 210 


INPUT B 


C| (20-A) ; " DE ";N|(10-B) 


220 


PRINT AT 13,2; "LAMENTO ... 


500 PAUSE 300 


ERROL 


NOVAMENTE " 


510 CLS 


225 


PAUSE 120 


520 GOTO 30 ' 



40 
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em nenhuma das vezes (na verdade, nSo 
se trata de teste, e sim de uma forma de 
voce passar ao micro qual a carta mar- 
cada). 

Quando voce estover sendo testado, 
impressione seu amigo, diga coisas do 
tipo: "Das 95 vezes que tentei ji acertei 
•15”. O importante 6 faze-lo acreditar 
que realmente houve uma tentativa sua 
de adivinhar algum numero. 

No prime iro teste o micro lhe pede 
para adivinhar um numero de 1 a 20 (in- 
forme, entao, o niimero da carta). Para 
que nada seja percebido, aplicamos aqui 
uma pequena fdrmula : SENHA = 20 — 
INDICE, onde: 

• SENHA - numero que vooe informa- 
r * ; . 

• INDICE - valor da carta e posiciona- 
mento na tabcla (figura 2). 

Voltando ao exemplo da figura 1 , a 
senha seria 12, pois o indice de 8 6 ele 
mesmo e 20 - 8 = 1 2 (veja, na figura 2, 
a tabela de correspondence de indices 
para cada carta, com suas respectivas se- 
nhas jd calculadas). 

No segundo teste, voce terf que adi- 
vinhar um numero de 1 a 10 (este 6 para 
voce informar o naipe da carta). O pro- 
cedimento t similar ao do numero, sen- 
do a frirmula: SENHA = 10 - INDICE. 
Seguindo ainda o nosso exemplo (oito 
de paus), a senha seria 6, pois o indice 
de Paus 6 4,e 10-4 = 6 (na figura 2 es- 
t i tambdm a tabela de indices de naipes). 

As tabelas e frirmulas sSo simples de 
decorar, mas cuidado para nSo esquecer 
de nada ou errar nos crflculos na hora, 
pois um erro neste momento podera es- 
tragar o show do Mago. Outra coisa:< 
imprescindfvel que vooe aja com naturali- 
dade para que seu amigo pense que se 
trata de uma tentativa sua de adivinhar 
os numeros. 

Depois dos testes , o Mago assume 0 
espetaculo e caberi a voce apenas auxi- 
Uar seu amigo na contagem das cartas. 
No final, a grande sensaqSo: o Mago dir£ 
a seu amigo qual foi a carta escolhida! 

Uma ultima dica: n£o faqa este tru- 
que por repetidas vezes para a mesma 
pessoa, pois 0 fato de voce ter que olhar 
as cartas pode levar seu amigo a descon - 
fiar, e, a final, voc£ nffo quer seu truque 
desvendado, n3o 6 mesmo? 

Meus agradedmentos ao Mdgico In- 
temadonal Prof. Kassimirus (meu pai) 
que colaborou com este artigo, conce- 
dendo, com grande boa vontade, este 
truque. um 

SB 



dost Rafael Sommarfald trabelha hi mais da 
tris anos com programepio de mfcrocompu- 
tadoras. £ co/aborador de MICRO SISTEMAS 
dasde o numero 22 a atua/mente trabelha no 
ISAM - Institute Braslleiro de Administra- 
Cio Municipal. 




Mdnica. 

Acompanheira ideal. 



Seu micro tern agora a companheira perfeita. 

Alem de bonita a Monica tem boa cabcqa, com a qualidadc de impressao 
assegurada para mais de 300 milhoes de caracteres, ou seja, mais de 5 anos. 
Tem velocidadc de 100 cps c impressio bidirecional, com procura logica. 

A Monica "fala" portugues, com cedilhas, acentos etc. Imprime textos, 
desenhos c graficos em formularios continuos com ate 10 polegadas de 
largura, em ate 5 vias, ou em papel carta. 

Simples, ja que sua eletronica reside em apenas uma placa, a Monica 
e tambem muito versatil. Suas possibilidades de utilizaqao podem ser 
ampliadas com modules opcionais, adequados as mais diversas aplicaqocs. 

Mas o melhor e que a Monica tem a qualidade, tecnologia de vanguarda 
e eficiencia comuns a toda a linha de produtos Elebra Informatica. 



Lntdadr dr duto rig 
com crrwcho rtmotitrl 



MOnte* EIOOIO 
Imprruora 100 cpi 



Trlrtmprtuoro KSP 
EIS030-T 



Hordern FSOO AH 
Umdmde de duco fletivr 



Alter - EI90SO 
Imprruora 200 cpi 



Emilia Graficr EiSOJI 
Imprettoro 100 cpi 




Hordern FSpO-TR I 

Urndode de duco /luM 1 



INFDRMKTICK 



Eficitncia c Confiabi I idade. 
Em Tod a a Linha. 
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Comece uma nova fase na sua vida profissional. 

Os CURSOS CEDM levam ate vocS o mais modemo ensino 
tecnico programado e desenvolvido no Pafs. 






Sao mais de 140 apostilas com informagSes compietas e sempre 
atualizadas Tudo sobre os mats revolucionario CHIPS E voce 
recebe, aiem de uma solida formag3o teorica. KITS elaborados 
para o seu desenvolvimento prStico. Garanta agora o seu futuro 



Este CURSO, especialmente programado. oferece os 
fundamentos de Linguagem de ProgramagSo que domma o umverso 
dos microcomputadores. DinSmico e abrangente, ensma desde o BASIC 
b^sico ate o BASIC mais avartgado, inclumdo nogoes bSsicas sobre 
Manipulagao de Arquivos. Ticnicas de Programagao, Sistemas de 
Processamento de Dados, Teleprocessamento. Multiprogramagao e 
Tecnicas em Linguagem de Maquina, que proporcionam um grande 
conhecimento em toda a area de Processamento de Dados 



KIT CEDM Z80 
BASIC Cientlfico. 

KIT CEDM Z80 
BASIC Simples. 

Gabarito de Fluxograma 
E-4. KIT CEDM SOFTWARE 
Fitas Cassete com Programas. 



CEDM 20 • KIT 
de Ferramentas. 

CEDM 78 KIT 
Fonte de Alimentagao 
5v/1 A. CEDM 35 KIT 
Placa Experimental 
CEDM 74 KIT 
de Componentes. 
CEDM 80 

MICROCOMPUTADOR 
Z80 ASSEMBLER. 




Voce mesmo pode desenvolver um ritmo prdprio de estudo. A lin- 
guagem simplificada dos CURSOS CEDM permite aprendizado fdcil. E 
para esclarecer qualquer duvida, o CEDM coloca A sua disposigSo uma 
equipe de professores sempre muito bem acessorada. AI6m disso, voc6 
recebe KITS preparados para os seus exercfcios prSticos. 

Agil, moderno e perfeitamente adequado & nossa realidade, os CUR- 
SOS CEDM por correspondence garantem condigfles ideais para o seu 
aperfeigoamento profissional. 

mmmeGRATisaamms 

VocS tambem pode ganhar um MICROCOMPUTADOR. 

Telefone (0432) 23-9674 ou coloque hoje 
mesmo no Correio o cupom CEDM. 

Em poucos dies voc£ recebe nossos catdlogos de apresentagao. 





Caderno Especial da 
III Feira Intemacional 
de Informdtica 



Saldo positivo, 
apesar dos pesares 



H festa foi boa. Cerca de 300 mil pessoas visitaram a 
Feira, um espa 90 de 20 mil m 2 onde quase 250 em- 
presas (90% delas nacionais)expunhamseusprodutos. 
0 neon reinou absoluto, complementando a esmerada decora- 
9 ao dos estandes, enquanto feixes de laser verdes e vermelhos 
cruzavam o ar, complementando o tom futuristico do ambiente. 

No outro lado do Parque Anhembi, no Palacio das Conven- 
ers, o Ministro de Assuntos Fundiarios e Chefe do Conselho 
de Seguranea Nacional, Danilo Venturini, abria o XVI Congres- 
so Nacional de Informatica dizendo a um auditorio lotado que 
o setor serd instrumento indispensdvel para a superaeao dos 
obstaculos advindos das atuais dificuldades conjunturais bra- 
sileiras, e advertia: “Devemos redobrar nossos esforeos para 
conquistar o pleno dornmio sobre todas as fases da tecnologia 
da informaeao”. 

0 presidente nacional da SUCESU - Sociedade dos Usua- 
rios de Computadores e Equipamentos Subsidiaries, entidade 
promotora do evento, Josd Henrique Portugal, por sua vez, tra- 
?ou um paralelo entre a indiistria de Informatica hoje e a in- 
dustria automobili'stica dos anos 50 e afirmou: “Com a Hist 6 - 
ria na mao 6 imperativo argumentar a favor da inteligencia na- 
cional pela razao do desejo de todas as empresas e empresa- 
rios brasileiros de andar por suas prdprias pernas, comanda- 
dos pelos seus proprios c^rebros, sem as caixas pretas de tecno- 
logias nao dominadas”. 

De volta a Feira, onde 6 possivel constatar, em termos ma- 
te riais e concretos, o verdadeiro estdgio de desenvolvimento da 
industria nacional, viu-se — pelo menos em termos de micro- 
informdtica — que a situaeao, se nSo estd tao boa quanto dese- 
jam Venturini e Portugal, n5o esta tao ruim quanto muitosa 
pin tarn. 

A criatividade de projetos originais, 6 fo^oso reconhecer, 
continua em baixa, sobretudo na 2 rea de software, onde pre- 
dominam os pacotes estrangeiros, “traduzidos” ou nao. No 
hardware, os modelos seguem de perto os padroes estabeleci- 
dos pela Sinclair, pela Apple e pela Radio Shack (linha TRS). 

Esta Feira, alias, marcou a explosao da linha Apple (ja exis- 
tem mais de dez modelos diferentes), em contrapos^ao a 
um relativo declinio da liniia TRS (fora o Color Computer, ins- 
pira 9 ao de tres lan 9 amentos, surgiu apenas um Modelo III, e a 
Dismac abandonou os TRS, passando-se para a linha Apple) e 
um discreto aumento dos compativeis com o Sinclair. 

Esses equipamentos, contudo, nem sempre seguem a risca 
os projetos dos similares estrangeiros que emulam. Na luta pa- 
ra diferenciar produtos basicamente iguais, diversos fabricantcs 
introduzem modifica 95 es para atrair a aten 9 ao dos comprado- 
res, seja a nivel de eletronica (por exemplo, os Apples com 
microprocessador Z80 incorporado, para poder rodar dircta- 
mente programas em CP/M), possibilidades adicionais de cone- 
xao de perifdricos, ou mesmo pacotes aplicativos especiTicos 
para diversas areas. Uma surpresa foi o numero de computado- 




res de 16 bits - compativeis ou nao com o IBM-PC -, bem 
maior do que se esperava, al<5m dos equipamentos capazes de 
operar em oito e 16 bits. 

Registre-se tambdm alguns projetos originais genuinamente 
brasileiros, como 6 o caso da rede da Scopus, do sistema de 
controle da Embramic e dos protocolos de comunica 9 ao para 
Apple, entre outros. 

No balan 90 geral, pode-se considerar o saldo positivo. Para 
a maior parte das necessidades brasileiras, os produtos expos- 
tos sao tecnologica e operacionalmente suficientes. Apesar do 
entusiasmo que os computadores vem despertando nos mais 
variados segmentos da popula 9 ao, o mercado ainda 6 pequeno 
(todos os fabricantes, sem exce 9 ao, queixam-se da falta de es- 
cala, que impede um maior barateamento dos produtos e a 
produ 9 ao local dc determinados componentes), encontrando- 
se em fase de forma 93 o. Antes de pensarmos em maiores voos 
tecnoldgicos, € preciso consolidar o mercado, difundindo o 
uso da Informdtica e criando empresas financeiramente sauda- 
veis, com recursos para poderem investir em tecnologia. Ha 
ainda as universidades, os institutos e centros de pesquisa, que 
precisam ser estimulados, e cuja colabora 9 ao com a industria ja 
tern chegado a resultados bastante compensadores. 

Um mercado nacional, forte e auto-suficiente, nao se forma 
da noite para o dia, e sempre havera os que nada buscam aldm 
do lucro facil. E preciso, contudo, ter cuidado com as generali- 
za 9 Qes, que simplesmente colocam “no mesmo saco”, de ma- 
neira indiscriminada, empresas que possuem estratdgias de pes- 
quisa e desenvolvimento totalmente diferenciadas. 

As autoridades do setor tratam a reserva de mercado como 
um “permanente transitorio”, e, assim sendo, caso a reserva ve- 
nha a cair, os que limitam-se a copiar terao o desprazer de ver 
seu rendoso neg 6 cio ir por agua abaixo, enquanto aqueles quo 
encontraram solu 9 oes originais para problcmas cspcciTicos bra- 
sileiros verao garantida sua fatia dc mercado. Nao ha razao pa- 
ra afli 9 ao ou argumenta 96 cs precip’itadas. E tudo uma questao 
de tempo. E competcncia. 
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Linha SINCLAIR 



Criatividade no hardware, 
mesmice no software 



Rena to Degiovani 




III Feira de Informatica signifi- 
cou um marco decisivo no que 
diz respeito aos pequenos equi- 
pamentos, ou seja, para a linha Sinclair. 
At£ entao vistos como “micrinhos” que 
s6 tinham aplica^o nos jogos ou so 
serviam para rodar programas elementa- 
res, esses equipamentos tiveram uma 
grande evolu^ao na parte de hardware. 

De fato, o que se tern atualmente 6 
uma empresa (Microdigital) seguindo 
mais de perto o projeto do ZX81, em 
rela<jao a quantidade de chips utilizados, 
e as outras empresas (Proldgica, Ritas, 
CDSE e Engebras), seguindo caminhos 
prbprios, o que, do ponto de vista do 
usudrio, nao im porta muito. 0 que im- 
porta, no caso, sao as caracteristicas fi- 
nais com as quais o equipamento serd 
apresentado ao consumidor. 

Com esses lan 9 amentos, o usudno 
passa a ter uma boa gama de modelos a 
escolher, indo do mais simples - o 
TK83, da Microdigital - ao mais com- 
pleto — o Ringo, da Ritas do Brasil — , 
passando pelo AS 1000, da Engebrds, 
pelo Apply 300, da. CDSE, pelo CP-200, 
da Prolbgica e pelo TK85, tambem da 
Microdigital. 

No que diz respeito a linguagem 
(BASIC Sinclair), todos eles sao compa- 
tfveis e nao hi necessidade de altera 9 oes 
nos programas de um equipamento para 
que ele possa ser rodado em outro. Mes- 
mo as grava 9 oes de fita cassete podem 
ser utilizadas em qualquer equipamento. 

Quanto a funcionalidade, cada equi- 
pamento possui pontos a serem conside- 
rados: 

• TK83 - e o mais simples dos equipa- 
mentos e nao possui nenhu- 
ma novidade, a nao ser um 
design mais elegante; 



• TK85 - 6 basicamente um TK83 
com memoria de 16 ou 48 
Kb interna, teclado tipo 
pastilha e uma EPROM com 
high speed, verify e rotinas 
de manipula 9 ao dados; 



• CP-200 - nao trouxe nenhuma novi- 

dade. As implementa 9 oes 
mostradas na Feira ficaram 
a cargo de firmas mdepen- 
dentes; 

• AS 1000 — projeto simples, com te- 

clado piano de membrana e 
mddulos de expansao de 
memdria internos; 

• R470 (Ringo) - teclado tipo chiclete, 

teclas especiais, inversao de 
video programdvel ou via 
teclado e cartuchos especiais 
de programa 9 ao; 

• Apply 300 — nao foi mostrado na 

Feira. 

De todos os equipamentos apresenta- 
dos, o Ringo merece o maior destaque 
pela gama de recursos oferecidos, o que 
o colocou a frente de computadores 
da linha TRS, pois apresentou imple- 
menta95es so encontradas em equipa- 
mentos de muito maior porte. 

MUITO HARD, POUCO SOFT 

As grandes atra 9 oes, no entanto, fica- 
ram a cargo de fabricantes de periferi- 
cos, que se revelaram altamente criati- 
vos. O que mais se sobressaiu foi o Su- 
per CP-200, da Polimicro, que possui 
teclado numerico reduzido e com opera- 
9 oes matemdticas, chaves para controle 
do bip e inversao de video, auto SHIFT, 
auto FUNCTION, auto repeti 9 ao de te- 
clas, leds de indica 9 ao e dois joysticks, 
alem de redefini 9 ao de caracteres. 

A Tplak tambem apresentou suas no- 
vidades, como o Ioplak (placa de In/Out 
com at£ oito entradas e saidas para con- 
trole de reles), o Biplak (um bip de te- 
clagem para equipamentos que nao o pos- 
suem) e o Caraplak (um redefmidor de 
caracteres que proporciona recursos s6 
encontrados em equipamentos de alta 
resolu 9 ao grafica). 

Apesar de a Feira ter mostrado uma 
boa evolu 9 ao de hardware, o software 
nao apresentou em momento algum evo- 
lu 9 ao de qualidade. Nao houve um so 



lan 9 amento que merecesse maior aten- 
9 ?o pelo seu ineditismo. Os jogos ainda 
sao os mesmos jogos e os aplicativos do- 
m^sticos (chamados “sdrios”) nao foram 
expostos pelas software houses. 

Esse estado de coisas pode ser ex- 
tremamente prejudicial a implanta 9 ao 
de uma sociedade informatizada, poisli- 
mita (e muito) a utihza 9 ao dos micros. 
Ainda n£o temos software houses preo- 
cupadas com uma linguagem acessivel 
ao usuino nacional. 

A Feira trouxe, aldm disso, uma ou- 
tra discussao. Com o incremento da li- 
nha Sinclair - atualmente dispomos de 
tres linhas de micros bem defmidas: a 
Sinclair (ZX), a TRS e a Apple - o mer- 
cado de micros torna-se muito sensivel a 
aspectos funcionais ate entao relegados 
a segundo piano. De fato, nao interessam 
mais ao usuaho equipamentos compati- 
veis apenas com eles mesmos e sim que 
essa compatibilidade total entre micros 
seja a mais extensa possivel. Isso 6 uma 
das tonicas dos micros Sinclair, que pos- 
suem compatibilidade total entre os di- 
versos equipamentos. 

Na reahdade, um sistema Sinclair 
com implementa 9 oes deixa, em termos 
de recursos, qualquer TRS “a ver na- 
vios”. E no momento em que for incor- 
porado aos ZXs um sistema similar aos 
disk drives, a disputa entre essas duas li- 
nhas ficara muito mais acirrada. 

Mas poderiamos questionar a 16gica 
Sinclair quanto a sua aplica 9 ao em seto- 
res mais especificos, como aplica 9 oes 
comerciais e empresariais. A falta de ins- 
tates (READ, DATA, DEFFn etc) so 
e sentida pelos que realmente nao conhe- 
cem a programa^o desses equipamentos. 
Alem disso, os micros dessa linha sao de 
longe os mais fdceis de ser operados e 
sua lmguagem BASIC 6 a mais facil de 
ser aprendida. Isso tudo, somado ao bai- 
xo custo desses micros pode, e ira sem 
duvida alguma, credenciar essa linha de 
equipamentos como uma das mais vid- 
veis na populariza 9 ao do uso dos micro- 
computadores. 




TK 83 



O TK 2000 Color, novo micro que utiliza processador 6502, o vi- 
deogame Onyx e uma interface paralela de impressora para os TKs de 
linha Sinclair foram os langamentos da Microdigital, que mostrou tam- 
b4m o TK-83, este uma versao aprimorada do TK82-C. 

Com um prego bastante reduzido para os recursos que oferece ( se- 
gundo a empresa, deverd custar por volta de Cr$ 490 mQ quando chegar 
ds lojas em dezembro), o TK 2000 Color possui microprocessador 6502, 
16 Kbytes de ROM (onde se localizam o interpretador BASIC e um uti- 
litdrio contendo um mini-assembler e um monitor disassembler) e 64 
Kbytes de RAM. O eauipamento aceita disquetes de 5 1/4”, poae con- 
trolar, por software, dois gravadores cassete e tern conexao paralela tipo 
Centronics para impressora. Tern teclado profissional de 54 teclas, 65 




interface paralela com TK 85 



comandos (acessados por apenas uma tecla), 46 fungoes, 59 caracteres 
alfanumdricos e 49 graficos, alem de quatro teclas de movimentagdo de 
cursor, duas de disvaro (para jogos) e uma de RESET. Ha quatro modos 
de display: texto (40 caracteres por 24 linhas), grafico de baixa resolu- 
qio (40 x 80), grafico de alta resolu^ao (280 x 192 pontos) e texto de 
alta resolucao. O sistema gera seis cores e tern duas saidas de video: RF 
(PAL-M) ou direta, para monitores. O TK 2000 Color 4 compativel 
com o BASIC Applesoft, contudo, a nivel de Assembler, o equipamento 
utiliza um formato prdprio, nao sendo, portanto, compativel com os 
demais Apples. A Microdigital estd desenvolvendo uma s4rie de aplica- 
tivos e jogos para o TK 2000 Color que, de acordo com a empresa, es- 
tarao tambim disponiveis no final do ano. 

O videogame Onyx, que comegard a ser comercializado tambem em 
dezembro por Cr$ 250 mil e jd com 20 cartuchos de jogos em oferta, 
tern alta resolugao grdfica e 16 cores, aUm de produzir varios efeitos so- 
noros. Vem acompanhado por dois joysticks, cada um deles contendo 
um mini-teclado. 

O TK 83, que substitui o TK82-C, aldm da caixa mais bonita, traz 
um aperfeigoamento de eletronica: o circuito responsdvel pela fungao 
SLOW, que no modelo anterior ficava numa placa separada, superposta 
sobre o circuito principal, vem agora incorporado a este circuito. O 
prego de langamento 4 de Cr$ 140 mil. 

Jd a interface paralela tipo Centronics - prevista para dezembro a 
um custo aproximado de Cr$ 100 mil - abre para os TKs 82C, 83 e 85 
uma ampla gama de aplicagoes, ao permitir-lhes saidas impressas de boa 
qualidaae. O modelo exposto na Feira, por exemplo, interligava um TK 
85, com 16 K, a uma impressora matricial Monica , da Elebra, de 100 
CPS e 80 coh/nas. 





Ringo 



Na linha Sinclair, as novidades da III Feira 
de Informatica ficaram por conta de dois lan- 
gamentos: Ringo, da Ritas do Brasil, e o AS 
1000, da Engebras. O Ringo trabalha com gra- 
vador cassete, e pode ser ligado a televisor co- 
mum. Sua memdria inicial 4 de 16Kbytes de 
RAM, expansivel at4 48K- memdria ROM de 
8K expansivel at4 16K. O Ringo possui in- 
terface para utilizagao de modem e joystick, 
e entre seus perif4ricos encontra-se interface 
para utilizagao de mdquina de escrever el4trica 
como impressora, sintetizador de sons, disca- 
dor automdtico de telefone, gravador de 
memdrias EPROM e interface “ultra fast" pa- 
ra tape deck. Com o cartucho Editor Z 80, o 
usuirio poderd programar o Ringo em Assem- 
bler. A comercializagdo do Ringo sera atrav4s 
de lojas especializadas e magazines, e seu pre- 
go fica por volta de Cr$ 300 mil. 



AS 1000 

O AS 1000 tern memdria inicial de 16 
Kbytes de RAM, expansivel at4 48K, atrav4s 
de mddulos de 16K ; trabalha com gravador 
cassete, recebendo at4 quatro gravadores com 
o uso da interface AS 100 e pode ser ligado a 



qualquer TV. Entre os perif4ricos que podem 
ser ligados ao AS 1000 estdo modem, joystick 
e speed file. Q AS 1000 estd disponivel a par- 
tir de novembro nas lojas e seu prego 4 de 
CrS 180 mil. 
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Linha TRS-80 



do mddulo numerico reduzido. O equipamen- 
to permite a incorporagao do 8088, de 16 bits, 
que o tomard compativel com o micro pessoal 
da IBM, aldm da ligagao com maquinas de es- 
crever eld trie a IBM ou Olivetti eletronica. Em 
siia configuragao basica, o ED-P, que somente 
sera comercializado no primeiro trimestre de 
84, custard por volta de 600 OR TNs. 



Tradicional fabricante de minicomputado- 
res, a empresa gaiicha Edisa langou durante a 
Feira o microcomputador pessoal ED-P. Em 
sua configuragao basica, o equipamento vem 
com UCP Z80, 64 Kbytes de memdria RAM, 
monitor de fdsforo verde, dois drives para dis- 
quetes de 5 1 /4"e unidade de teclado incluin- 



8221 xc 

A Labo langou um microcomputador to- 
talmente compativel com seu ja conhecido 
micro profissional 8221, o 8221 Executivo. 
Com microprocessador Z80, capacidade de 
memdria de ate 128 K e utilizagao de disque- 
tes de 5" - dois drives tia configuragao bdsi- 
ca, em densidade dupla atingindo 160 K -,o 
8221 XC trabalha com o sistema operacional 
SOL. e roda aplicativos em CP/M, podendo 
trabalhar com perifdricos impressores de 80, 
100, 160 CPS ou impressoras tipo daisywheel. 
Seu teclado - do tipo borracha - d indepen- 
dente do monitor e apresenta 13 teclas de 
fungoes especiais e quatro programdveis. 0 
prego de langamento previsto ficard entre 700 
e 800 ORTNs. 

Aldm do 8221 XC, a empresa demon strava 
em seu tradicional sistema 8221 um sistema 
para rede de hotdis, desenvolvido pela soft- 
ware-house gaiicha Know How. 



A Brascom apresentou o seu novo micro- 
computador pessoal: Foxy. Sua UCP trabalha 
com microprocessador Z 80A e na configura- 
gdo basica o Foxy vem com teclado, video de 
fdsforo verde, um drive para disquete de 
5 1/4" (aceita tambdm disquetes de 8”), du- 
pla face e dupla densidade, duas portas se- 
riais e duas paralelas. Nesta versao, seu prego 
fica por volta de CrS 1 milhao e 800 mil. 0 
sistema operacional do Foxy 4 o BR 1000, 
compativel com toda a linha de computado- 
res da Brascom. O Foxy pode ainda funcio- 
nar tambdm como terminal de video para o 
BR 1000 M (Multiusudrio). 



Sysdata III 



'arios langamentos 

tracao no estartde da Prologica, entre os quais 
o Super 700, uma versao modular do Sistema 
700 composta por CPU, fontes de alimenta- 
gdo , video, teclado e unidade de disco, com 
novas tungoes de video Xa linha de impresso- 
ras.a Prologica apresentou ao publico a P-^dO. 
com 132 colunas e velocidade de impressao 
^ de 400 CPS. a Quahtat. com I ' agulhas (o do- 
^ bro das impressoras tradicionais) velocidade 
- arc 

; Jf . gua portuguesa e a P- ~25. uma nova versao da 

p ~2o.eom 2 3o CPS Outras novidades toram 
L o Pronet, rede local composta por um geren- 
TCoor ciador com disco rigido de 10 a 96Mb, con- 

trolador e um processador que pode ser liga- 
A Sysdata, fabricante do ja conhecido JR, do com vdrios micros Sistema 700, e o Didata 

langou dois outros computadores da linha 16, um acessdrio que permite a ligagao de um 

TRS. 0 TColor, compativel com o TRS Color CP-500 com atd 16 outros micros CP-500 ou 

Computer, utiliza microprocessador Motorola CP-300, para uso em centros de treinamento. 

6803, tern monitor de 8 Kbytes de EPROM e a Prologica langou tambdm uma sdrie de aces- 

memdria standard de 4 K RAM, expansivel sdrios para seus computadores pessoais: som 

at 6 20 K por mddulos externos de 6 K. 0 estdreo, que permite ligar os CPs 300/500 a 

equipamento ja vem com interfaces RS232C e amplificadores; placas de tela de alta resolu- 

para cassete. Pode gerar 256 not as sonora s e 
oito cores, fora o (undo. Sua linguagem, o 
BASIC Microsoft, permite comandos multi- 
plos por linha e incorpora as instrugoes READ, 

DATA e RESTORE. 0 teclado 6 do tipo chi- 
cletes, com 49 teclas mais barra de espago, in- 
cluindo teclas de comando direto. 0 seu gabi- 
nete, bastante compacto, inclui a fonte de ali- 
mentagao, e o computador aceita cartuchos 
externos intercambiaveis de programas ou jo- 
gos. Seu prego de langamento 6 de Cr$ 380 
mil. 

Para as aplicagoes mais profissionais, a em- 
presa langou o Sysdata III, equipamento com- 
pativel com o TRS-80 modelo III. Baseado 
em microprocessador Z80A e com 64 K de 
memdria RAM, o Sysdata III pode rodar dois 
sistemas operacionais: TRSDOS ( com BASIC 
residente em 16 K ROM e tela formato 64 x 
16) e CP/M ( tela em 80 x 25). Tern dois ca- 
nais de comunicagao serial (para impressora, 
modem, outros micros, etc.), interface parale- 
la para impressora e teclado profissional des- 
tacdvel com teclado numdrico reduzido. Aldm 
do BASIC, o Sysdata III aceita as linguagens 
COBOL, Fortran, Pascal, Lisp e Forth. Possui 
ainda capacidade grafica de 128 x 48 elemen- 
tos e recur sos semi-grdficos no modo 80 x 25. 

0 equipamento, a exemplo do MC-10, comega 
a ser comercializado a partir de novembro. 0 
prego para uma configuragao com UCP/tecla- 
do, video de fdsforo verde, impressora de 100 
CPS e dois disquetes de 5 1/4" estd por volta 
dos CrS 3,5 milhoes. 



Varix VC 50 d o nome do computador compativel com TRS Color 
langado pela Engetecnica Varix, de Piracicaba, SP. Com UCP Motorola 
6809, o Varix VC 50 apresenta. em sua configuragao normal, memdria 
RAM de 64 K, mais 16 K ROM com o interpretador BASIC e outros 
16 K ROM em cartucho intercambidvel. A empresa promete para breve 
uma expansao de 128 K em memdria de bolha. 0 equipamento tern te- 
clado profissional com teclado numdrico reduzido, incorpora interface 
RS232C e pode controlar atd quatro unidades de disquete de 5 1/4". 
Gera nove cores e tern- alta e baixa resolugao em graficos (13 modos 
graficos e dois semi-grdficos, alcangando mais de 49 mil pontos no vi- 
deo). Tern saidas de video composto para monitores e RF, interface 
standard para cassete em 1500 baud e auatro entradas analdgico /digi- 
tal s para aquisigao de dados ou ligagao de dois joysticks. 0 equipamen- 
to pode acessar vdrios bancos de memdria, o que permite utilizar 32 K 
como spooler para impressora. Trabalha com dois sistemas operacionais: 
VDOS, compativel com o TRS Color Computer, e VFLEX. Com este 
ultimo, toma-se possivel utilizar diversas linguagens, tais como Pascal, 
Forth e C BASIC, entre outras. A configuragao basica do equipamento . 
sem os disquetes, custa CrS 1 ,5 milhao. As unidades de disco, por sua 
vez, tern os seguintes pregos: Cr$ 800 mil a primeira e CrS 600 mil a 
segunda. 



CP 300 e controlador de jogos 

gao para os CPs 200/300 /500- controlador de 
jogos ; placa RS 232 para o CP-300 e monitor 
de video MV 300, fdsforo verde, tambdm para 
o CP-300. Todos os langamentos apresentados 
pela Prologica ja estao sendo comer cializados. 



Aceita ainda os seguintes perifdricos: interface 
paralela para impressora tipo Centronics-, sin- 
tetizador de voz-, interface serial RS232C-, e 
interface DGP/M, que toma o equipamento 
compativel com o CP/M. O video, de fdsforo 
verde ou branco, tern 16 linhas x 64 (ou 32) 
colunas e capacidade semi-grafica de 128 x 48. 
Com a interface opcional para cores em alta 
resolugao, o sistema trabalha simultaneamen- 
te com dois videos: o monitor normal do mi- 
cro e um televisor a cores, onde se obtera uma 
resolugao de 256 x 192 pontos e 16 cores. 



Um novo gabinete, de linhas mais bonitas 
e harmoniosas, em poliuretano. Teclado nu- 
mdrico reduzido e video profissional em fds- 
foro verde. Maior facilidade de expansao em 
placas facilmente encaixaveis em slots pelo 
prdprio usuario. Essas sdo algumas caracte- 
risticas do DGT-1000, o novo computador 
langado pela Digitus, juntamente com uma in- 
terface para cores em alta resolugao. 

Com capacidade de memdria RAM de 16 
Kbytes atd 64 K. pode suportar atd quatro 
unidades de disco fiexivel de 5 1/4" dupla 
face /densidade simples de 185 Kbytes cada. 



O Color 64, apresentado pela Novo Tempo, d um sistema compati- 
vel com o TRS Color Computer. Tern microprocessador 6809E. com 
clock de 0,8 MHz ou 1,8 MHz selecionado por software. Sua memdria 
ROM, com o interpretador COLOR BASIC, d de 16 Kbytes, enquanto 
a RAM para programas do usuario d de 64 K. O teclado compreende 53 
teclas padrao ASCII e o display de video pode ser atravds de TV comum 
ou monitor colorido, com nove cores e tres modalidades de apresenta- 
gdo: texto (16 linhas x 1 32 colunas) . grafico de baixa resolugao ( matriz 
64 x 1 92) e grafico de alta resolui^o (matriz 256 x 1 92). O equipamen- 
to tern saida sonora para televisao e conexdes para gravador cassete, im- 
pressora ou modem (interface serial RS232C) e para interface de disco 
fiexivel (controlador de atd quatro unidades de 160 Kbytes cada). Na 
parte de software, a Novo Tempo, oferece, aldm de linguagens, utilita- 
rios e software de comunicagao , uma sdrie de aplicativos a nivel comer- 
cial, cientifico e domdstico. O prego do equipamento, em sua configu- 
ragao basica, d de CrS 800 mil. 



Color 64 
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Linha APPLE 











Muitos langamentos e 
poucas novidades 



Rudolf Horner Junior 



III Feira international de In- 
formdtica apresentou diversos 
lan^amentos de novos equipa- 
da linha Apple. Vamos comefar 
do mais novo produto da Spec- 
trum, o Micro Engenho 2, compativel 
com o Apple II americano, mas monta- 
do em uma caixa semelhante d do PC da 
IBM. Seu teclado, ao contrdrio do Micro 
Engenho 1 , que d ligado d caixa, esta co- 
nectado atravds de um cabo espiralado. 

0 Micro Engenho 2 jd vem da fdbrica 
com uma interface para um par de dri- 
ves, 64 Kb de membria RAM e op 9 do. 
por software, para video de 80 ou 40 
colunas para resolugSo de texto. Ele 
possui um teclado alfanumdrico separa- 
do e caracteres emportugues, sinais para 
acentuafSo grdfica e letras maiusculas e 
minusculas. Como no Apple He, o Mi- 
cro Engenho 2 possui um programa de 
auto-diagnostico intemo para detectar 
algum eventual defeito no equipamento. 

A Unitron lanfou, durante a Feira, 
diversos cartOes perifdricos para o seu 
equipamento AP II. Sdo dispositivos que 
chegam em boa hora e que tomarao o 
micro ainda mais versdtil. 

A atengSo do publico, no entanto, 
foi atraida atravds de uma camera de VT 
que tomava a imagem do visitante, 
transferia a mesma para a primeira pagi- 
na de alta resolu 9 fo do AP D e, em se- 
guida, atravds de interface de dump para 
a impressora, a imagem era impressa em 
uma folha de papel. A mostra tambdm 
contou com um Unitron ligado ao ban- 
co de dados do Serpro, o Projeto 
Aruanda. 

A Milmar tambdm esteve presente 
apresentando em seu estande o Apple 




mentos 

falando 



II Plus, cbpia fidelissima do original, in- 
terfaces para impressora paralela e atio- 
nador de discos. 0 equipamento n2o 
apresenta diferen 9 a alguma com relafao 
ao micro americano. 

A Polymax, por sua vez, ndo mostrou 
nenhuma novidade especial para o seu 
micro, o Maxxi. Pordm, houve uma inte- 
ressante demonstrafao de aplica^ao do 
equipamento para pessoas parapldgicas. 
Tratava-se de um quarto onde diversas 
a9(5es eram executadas automaticamen- 
te, bastando que fossem seletionadas 
via teclado e comandadas com um sopro 
em um tubo de pldstico. 

A Victor apresentou o seu Elppa II 
Plus, outro novo micro da familia. Em 
seu estande foi mostrado um tablete gra- 
fico para desenhos no video (que, infe- 
lizmente, ainda ndo pode ser encontrado 
no nosso mercado) e diversos software 
de produ 9 fo nacional. 

No estande da Dismac esteve exposto 
o D-8100, outro micro compativel com 
o Apple. Nao foram feitas altera 9 bes e 
melhoramentos em rela^o ao modelo 
original . 

Em visita ao estande da Apple -tronic, 
pudemos conhecer mais um micro da li- 
nha Apple, o Apple-tronic P 6502. 0 
equipamento revela qualidade muito 
boa quanto d escolha dos componentes 
(principalmente com rela 9 do ao teclado) 
e, segundo os expositores, este d exata- 
mente o motivo pelo qual seu pre 90 d 
ligeiramente superior aos demais. Ndo 
foram feitas altera 9 bes, sequer a tradu- 
950 das mensagens de erro do sistema, 
que permaneceram em ingles. 

Jd com rela 9 ao ao Manager I, da Mag- 
nex, o visitante pode constatar que tra- 



ta-se de uma cbpia melhorada do mode- 
lo original. 0 teclado, aldm de ter nume- 
ros separados das letras no lado direito, 
permite caracteres em portugues, acen- 
tos e colchetes. Existem quatro estados 
para o teclado e o usudrio pode, inclusi- 
ve, gerar caracteres grdficos. 0 Manager 
I possui intemamente interfaces para pe- 
rifdricos, o que em muitos outros equi- 
pamentos d optional. 

Outro detalhe com rela 9 do ao Mana- 
ger I d que seu teclado possui uma fileira 
de teclas ds quais podem ser atribuidas 
fiu^Oes especificas, evidentemente as 
que sao usadas mais frequentemente. 

Os usudrios de equipamentos da linha 
Apple tiveram, durante a Feira, a opor- 
tunidade de ingressar no Clube do Apple, 
uma iniciativa apresentada no estande 
da Micro Data. Ld tambdm estiveram em 
demonstra 9 do dois Dactrom E, da Mi- 
cronix, totalmente compativeis com o 
Apple He. 

Com rela 9 do ao software, o visitante 
pode conhecer alguns novos lan 9 amen- 
tos de software houses nationais. Infe- 
lizmente, pordm, ainda predominaram 
os programas “traduzidos”, que em mui- 
tos casos sdo inefitientes por representa- 
rem produtos elaborados para uma ou- 
tra cultura e uma outra legisla 9 do, di- 
ferentes da nossa. 

E parece que os lojistas ainda prefe- 
rem vender os programas copiados, que 
nao atentem totalmente ds necessidades 
do usudrio, ao invds de difundir entre os 
consumidores software mais especificos, 
jd produzidos pela industria national. Is- 
to nao d caracteristica unica da linha 
Apple, mas comum a todas as outras li- 
nhas de micros produzidos no Brasil. 




Maxxi Elppa II Plus 




A novidade que a Polymax apresentou para o MAXXI foi em termos 
de aplicagao: um sistema de controle de processos composto por um 
MAXXI com disco, ligado a uma unidade digital de interfaceamento 
que permite a tetrapldgicos (pessoas com os quatro membros compro- 
metidos) controlar - mediante um simples sopro num tubo pldstico 
- todo o ambiente em que se encontram. E possivel abrir e fecnar por- 
tas e cortinas, operar receptor de TV, receber e fazer ligagoes telefoni- 
cas, entre outras coisas. Muito util em hospitals e residences, o sistema 
pode, com pequenas alteragdes, ser empregado em automagao de pro- 
cessos industrials, pesquisas cientificas e trabalhos de Laboratdrio, por 
exemplo. 

Quanto ao MAXXI, recebeu duas modificagoes de eletronica: na 
saida de RF, o que melhorou a resolugao de video, e na chave de 
RESET (agora para ressetar o sistema i preciso apertar CONTROL /RE- 
SET), medida bastante util para proteger os usudrios distrafdos. 

Nos sistemas maiores, dois langamentos: o 105 WP, que i uma ver- 
sao mais econdmica do processador de texto 301 WP, utilizando mdqui- 
na de escrever eletronica Olivetti e disquetes de 5 1/4" e a versao para 
processamento de dados POLY 105 DP - Micro Terminal. 



Compativel com o Apple II Plus, o Elppa II Plus tern UCP 6502, 48 
K ROM, expansiveis, e 12 K EPROM com interpretador e compilador 
BASIC-ELPPASOFT, sistema monitor e sistema A UTOSTART. O tecla- 
do tern 52 teclas ASCII e a capacidade de texto do equipamento 6 de 
40 colunas x 24 linhas. Em baixa resolugao, a matriz d de 40x48, com 
16 cores, e em alta resolugao 6 possivel obter seis cores com matriz de 
280x192. O Elppa II Plus incorpora ainda alto-falante intemo, saida de 
video composto para monitor, E/S para cassete, conector para controla- 
dores de jogos e oito slots para expansdo. Alim deste micro, a Victor do 
Brasil fabrica ainda o Monitor III, de fdsforo verde, e os seguintes car- 
toes perifiricos: acionador de disquetes de 5 1/4" (podem-se conectar 
ati seis unidades, com tres dessas placas) : interface para PAL-M: expan- 
sdo de memdria de 16 K RAM: placa para 80 colunas: e cartdo CP/M. 




AP II 



Dos Apples nacionais, ele foi um dos primeiros, sendo bastante ven- 
dido. Seu teclado alfanumdrico tern letras maiusculas, minusculas e 
acentos, e sdo bastante amplas as possibilidades de expansdo ou interfa- 
ceamento do sistema (hd oito slots livres, mais um para cassete e outro 
para jogos). Alim dlsso, o AP II, fabricado pela Unitron Eletronica, tern 
saida para monitor de video P & B ou colorido (com definicao graft- 
ca superior a 50 mil pontos) e i capaz, mediante a instalagao da interfa- 
ce adequada, de transferir grdficos diretamente do video para o papel. A 
expansdo da memdria pode ser feita pela adigao de mddulos de 32 K, 
ati 128 Kbytes e a Unitron oferece ainda as seguintes placas opcionais: 
PAL-M: cartdo Z80 para CP/M: expansdo de video para 80 colunas; mo- 
dulador de RF: interface RS 232C: placa GPIB para controle de instru- 
mentacao: controladores de disquetes e impressora paralela: ROM com 
BASIC Interger. A configuragao minima, composta de UCP com 48 K, 
monitor de video e saida para cassete, custa cerca de Cr$ 1 milhao. 



Tradicional fabricante de cartoes perifiricos para a linha Apple, a 
Microcraft acaba de entrar para o clube dos fabricantes de microcompu- 
tadores com a apresentagdo , nesta Feira de Informdtica, do seu primeiro 
micro pessoal: o Microcraft -PC. Mantendo a tradigao, o PC tern UCP 
6502 e i compativel com o Apple II, mas a sua arquitetura inclui ainda 
um microprocessador Z80, o que Ihe permite executor todos os progra- 
mas baseados no sistema operacional CP/M-80, bem como operar com 
as linguagens COBOL, BASIC, Pascal, Fortran, Assembler e todas as 
outras suportadas pelo CP/M. 

Tern memdria RAM de 64 K, PC-SOFT-BASIC residente em 10 K 
ROM, mais 2 K de ROM com o programa monitor. Seu teclado alfanu- 
mirico de 52 teclas pode gerar caracteres mahisculos e mimisculos, de 
acentuagao e controle, todos com repetigao automdtica. Tern ainda um 
teclado numirico reduzido de 0 a 9, ponto e ENTER (RETURN). O vi- 
deo opera nos modos texto (24 linhas x 40 colunas, matriz 5x7, nor- 
mal, reverso e controle pleno do cursor), grafico de baixa resolu9ao 
(40x48 pontos ou 40x40 pontos com quatro linhas de texto: 16 cores) 
e grafico de alta resolu9ao (280x192 pontos ou 280x160 pontos com 
quatro linhas de texto: seis cores: imagem do video residente em 8 Kby- 
tes). Completam o equipamento as saidas de dudio, cassete, seis slots 
para perifiricos, conexao para joystick e duas unidades de discos flexi- 
veis de 5 1 /4” incorporadas no prdprio gabinete da UCP. 



A Milmar, empresa paulista e fabricante do 
Apple II Plus brasileiro, apresentava como 
principal atrativo o videogame Dactari, com 
muitos jogos coloridos a prender a atengao 
dos /ovens visitantes. 

Seu diretor, Mathias Alegrucci, ex-fabri- 
cante do Fenix, nos contou um pouco do his- 
tdrico da empresa. Apos sua saida da Dismac, 
langou o Fenix, pela firma de mesmo nome. 
Des feita a sociedade, jd com novos sdcios, foi 
langado o TRS 80 modelo IV. 

Este projeto redimensionado e com outro 
nome, LNW - com 96 K RAM e CP/M - foi 
aproveitado pela nova empresa, a Milmar, jun- 
tamente com o Dactari e o Apple II Plus. 
Quanto a utilizagao do nome Apple, o que se 
fez, segundo Alegrucci, foi "aproveitar um 




Apple II Plus 



descuido na drea de registro de patentes e 
Marketing". Procurando fazer "uma cdpia fiel 
do Apple americano", Alegrucci assumiu que 
a unica tropicalizagao que se fez foi adaptor 




LNW 



o equipamento ao sistema PAL/M, para que 
pudesse ser facilmente ligado a qualquer TV 
colorido. No mais, o Apple II Plus brasileiro e 
totalmente igual ao americano. 
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D-8100 




Alfa 



Para o lazer, a Dismac langou o videogame 
VJ 9000, que vem com dois joysticks, e com- 
pativel com Atari e custa Cr$ 1 70 mil. 

Ja na Area das aplicagdes comerciais pesa- 
das, entraram em cena os micros da linha Alfa 
- modelos 3003 e 2064 MH - voltados para 
o processamento distribuido. Baseados na 
UCP 2.80A, com memdria mi'nima de 64 K 
RAM e controlados pelo sistema operacional- 
REDE (compativel com CP/M 2.2 e MP/M), 
esses equipamentos permitem formar cpnfigu- 
ragdes de ate 16 UCPs operando nos modos. 
mestre e escravo e compartilhando perif&ricos 
de grande capacidade, como impressoras linea- 
res e discos rigidos de at 4 30 Mbytes. 



" A primeira geragao do D-8000 acabou. 
Saimos do TRS-80 e passamos para o Apple, 
em fungao da demanda do mercado". Foi 
assim que H4lio Nascimento, Gerente de Pro- 
paganda e Promogoes da Dismac, explicou o 
langamento do D-8100, micro pessoal compa- 
tivel com o Apple II Plus E. Com um prego de 
245 ORTNs para sua configuragdo basica 
(UCP com 48 K RAM e monitor de fdsforo 
verde), o D-8100 gera 15 cores, tern oito slots 
para cartoes de interface e adaptador para 
rodar CP/M. Mas nao se preocupem os usua- 
rios dos antigos D-8000 /I /2: Helio Nascimen- 
to garante que a assistencia ttcnica para esses 
produtos nao serd afetada. 




Apple-Tronic/J 6602 



Voltado para um mercado de aplicagdes mais profissionais , o Apple- Tronic /i6 502 permite, 
entre outras coisas, a interligagao a Rede Cybernet, estando previsto para breve o langamento 
de diversos pacotes de software especifico para as areas cientifica e industrial. Alem do monitor 
de fdsforo verde de 12" para 40 ou 80 colunas, a Apple-Tronic Computadores e Sistema fabrica 
e comercializa , entre outras, as seguintes interfaces: expansao de memdria de 16 a 128 Kbytes; 
UCP Z-80 (para CP/M); assincrona de comunicagoes nas velocidades de 50 a 19.200 bauds: sin- 
crona de comunicagoes; video de 80 colunas; controladora para at4 dois disquetes de 5 1/4"; 
controladora para at4 quatro disquetes de 8’j conversora para sistema PAL-M. O prego-base pa- 
ra o computador com 48 K RAM 6 de 216 ORTNs. O sistema aceita as seguintes linguagens op- 
cionais: Pascal, Fortran, COBOL, Assembler e Logo. 



Outro Apple apresentado na Feira foi o 
DM II, compativel com a Apple II e fabricado 
pela D. M. Eletronica Ltda., de Sao Paulo. 
Tern teclado indutivo controlado por micro- 
processador, com letras maiusculas e minuscu- 
las, saida de video ou RF, entrada para 
joystick, saida de audio (bips, tons musicais e 
palavras selecionados por soft), tres sistema s 
grdficos coloridos (GR, HGR e HGR2) e me- 
mdria basica de 48 K expansive l. 

Aceita as seguintes placas de expansao, fa- 
bricadas pela DME: Z80 (para rodar CP/M); 
Integer BASIC: interface RS232C: expansao 
para outras linguagens: expansao de video 
para 80 colunas: placa programadora de 
EPROM; interface para impressora; interface 
para disco flexivel; modulador de RF; conver- 
sor de video para sistema PAL-M. O prego ba- 
sico da configuragdo com 48 K RAM e 16 
ROM 4 de 20 ORTNs. 




DM II 




Micro Engenho 2 



O Micro Engenho 2 nao veio para substi- 
tuir o Micro Engenho. langado em 1981 pela 
Spectrum. Trata-se, antes, de uma versao apri- 
morada deste modelo e totalmente compati- 
vel com ele, bem como com o Apple II Plus e 
o Apple II E americanos. As diferengas entre 
os aois sis tenuis comegam pelo design: o Mi- 
cro Engenho 2 4 apresentado em tres volumes 
(UCP, teclado e video). O teclado, com 80 
teclas e auto-repetigao, inclui caracteres em 
Portugu4s, letras maiusculas e minusculas, 
com acentuagdo e cedilha acessados por soft- 
ware, al4m de teclado num4rico reduzido. A 
memdria RAM parte de 64 K e pode ser ex- 
pandida at 4 192 K. 

O sistema dispoe ainda de maior numero 
de slots livres (sete, contra quatro do modelo 
anterior) para instalar quaisquer interfaces 
projetadas para a linha Apple, al4m de um 
oitavo para receber o cartao que o torna com- 
pativel com o Apple II e amplia o video para 
80 colunas. Outras placas disponiveis sao as 
de interface serial ou paralela, cartao Z80 pa- 
ra CP/M e modulador de RF. O equipamento 
apresenta, ainda, possibilidade de utilizagao 
como terminal de videotexto. Em sua confi- 
guragdo bdsica, de UCP. teclado e video de 
fdsforo verde, O Micro Engenho 2 custa Cr$ 
3,1 milhoes. 



50 



MICRO SISTEMAS, novembro/83 




A mais completa exposicao 
de microcomputadores do pais 



A soluqao de compra do se u micro esta 
no CEI - Centro Experimental de 
Informatica da Servimec, a mais 
completa exposiqao de micros das mais 
famosas marcas do pais. 

Aqui voce tern acesso aos uarios 
microcomputadores e pode eleger o 
que melhorlhe conoem, atraves de 
testes sob a orientaqao de experientes 
profissionais que curtem o assunto 
tanto quanto voce. 



E para suas consu/tas e descobertas, o 
CEI ojerece uma Hvroria especiaUzada 
que inclui as mais importantes revistas 
nacionais e estrangeiras. Alem de levar 
o micro e os softwares unicos ao seu 
caso, no CEI voce ainda tern mais 
estas vantagens: preqos e 
condigoes especiais de 




finandamento, leasing ou aluguel. 
No CEI vod tern servit/os e 
atendimento completos. 

Venha ao CEI e demcubra um 
admirdvel mundo novo. 



Estacionamento proprio. 



Centro Experimental de Informatica 
da Servimec 



Rua Correa dos Santos, 34 - Tel.: 222-151 1 
Telex. ( 011)31.416 - SEPD -BR-Sao Paulo - SP 









Compatibilidade total 

DACTROS t e ante* de r udo i erukii 
0> wut dot* p'oce**adore* 2 W 
e h~>02 ofertctm total 
Compavbtldade *m Hardu are e 
Soft uare com Appc II plus 
Apple II I- e todo* os sous simriares 
e amda com todo s os 
'nicrocO'Mpuftido't’s que uii-itam 

CP M SO 

Pam uma dup-a ehc enc:o 




DACTRON-E - A solugao econdmica modular 

DACTRONE cresce com uoce e sua empresa. 

Com uma tecnologia baseada nas mats recentes inouagoes da informatica. 
possul estrutura para aceitar futures expansdes. 

Sua capacidade de memoria 6 de 64 KB. podendo ser expandida para 128 KB 
sem necessidade de placas complementers. 

DACTRON E possui uma faixa muito ampla de aplicagoes. 
tanto nas pequenas e medias empresas como para executiuos dinamicos. 
profissionais liberals e ainda em programas de aprendizado 
ou simplesmente diuersdes sensacionais. 




INDUSTRIA E COMERCIO DE 
COMPUTADORES LTDA. 



Rua Cerqueira Cesar. 242 Sanio Amaro • Tels 
CEP 04750 • Sao Paulo SP 



246-0271 - 246-0239 



M icroprocessador 
280 A e 6502 

Memoria de 64KB. 
expansfvel para 128KB 
sem placa adtcional 

Tela de 80 colunas 
Saida para TV P&B 



Saida para TV 
a cores padrfio PAL M 

Saida para TV 
a cores padrflo RGB 

Interface paralela 

Interface serial 
(RS 2320 

4 Conjuntos 

de caracteres selecionavets 
por software 

Teclas 

numericas isoladas 
Conexao com diskette de 8" 




Linha No -Break NIFE: 

energia 

que nao acaba mais. 




A Nifc produz c insiala sistemas 
completos de alimentagao 
inintcrrupta dc energia confiavel, 
isenta dc perturba^des, nas mais 
variadas configurates. 

Abrangendo capacidadcs de 2,5 a 
200k VA, os sistemas Nife foram 
dcscnvolvidos com tecnologia baseada 
cm meio seculo de tradicao. 
Proporcionam opera^ao simples e 
segura para as mais diversas 
aplicacdes: centros de computato, 
controle de processos industriais, 
instrumemagao, centros cinirgicos, 
plataformas de exploracao de 
petroleo, sistemas de sinalizato em 
ferrovias e metros, refinarias, etc 




t’PSE - Sistema Extra-Compacto 



No-Break Conventional 

(equipamento discrelo) 

• Potencia: 30 a 200KVA 

• Cada equipamento e montado em 
seu proprio gabinetc 

UPS - No-Break Compacto Inlegrado 

• Potencia: 2,5 a 30KVA 

• 0 retificador, o inversor e a chase 
cstatica sao montados em urn unico 
gabinetc, proporcionando ao 
sistema dimensoes reduzidas e alta 
flexibilidade de instalagao. 

UPSE - Sistema Extra-Compacto 

• Potencia: 15 KVA 

• Especialmente descnvolvido para 
aplica^oes em terminals bancarios 

e mini-computadores, devido as suas 
dimensoes extra-compactas 
e facilidade de operagao, possuindo 
sinalizacao simples e eficicntc 



SAB NIFE <© 

NIFE Brasil Sistemas Eletricos Ltda. 

Av. Pircs do Rw. 4001 - liaqucra - Td: (Oil) 205.7033 
Telex: (011) 25564 - Cx. Postal 53-243 - End. Tdegr.: NIFECAD 
CEP 08200 -Sao Paulo -SP 
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SOFTWARE 



Destaque para controle 
de processos e comunicapao 



uem foi a III Feira de Informa- 
tica em busca de software ge- 
nuinamente brasileiro, voltou 
decepcionado. 0 que se viu, na maioria 
das vezes, foi a exibiijao daqueles mes- 
mos pacotes de sempre, desenvolvidos 
por grandes empresas americanas. 

Considerando-se as categorias de 
hardware nas quais os construtores se 
baseiam para atingir o mercado nacio- 
nal. ou seja, os microcomputadores pes- 
soais tipo Apple e TRS-80 e os de mddio 
porte, como Polymax 201 DPou Prol 6 - 
gica 700, nao foi apresentada nenhuma 
novidade que indicasse tendencia ou al- 
guma perspectiva que justificasse o apa- 
recimento de uma industria de software 
comprovadamente brasileira. 

Tendo em vista, pordm, que o soft- 
ware apresentado ao publico comprador 
nao foi especificado de uma forma con- 
creta pela maioria dos exibidores, as 
lddias apresentadas pela BBS (Biblioteca 
Brasileira de Software) devem surtir 
efeitos rapidamente. Baseando-se no fa- 
to de que a importa 9 So de tecnologia de 
hardware para microcomputadores esta 
sendo grande em rela^o a cria 9 ao de 
software condizente com as necessida- 
des do nosso mercado, e na quantidade 
variada de tipos de pacotes de software 
que existem nos acervos de inumeras 
software-houses do pais, a BBS criou 
urn sistema que, ale'm de catalogar, orga- 
nize em categorias mais de 4 mil tipos 
de software e coloca-os a disposi 9 ao do 
publico, emprestando-os mediante o pa- 
gamento de uma taxa de assinante — da 



mesma forma como as bibliotecas fazem 
com os seus livros. Isto nos parece uma 
iddia original e criativa, dentro de urn 
mercado de software confuso e deso- 
rientado como o que existe atualmente. 

CONTROLE DE PROCESSOS 

Por exigir do projetista o desenvolvi- 
mento de urn hardware e software espe- 
cificos, de acordo com as particularida- 
des das situa 90 es a serem controladas, a 
area de controle de processos foi uma 
das poucas a apresentar trabalhos 
brasileiros autenticos. O software utili- 
zado pelo equipamento SDH-800 (sis- 
tema para aquis^So sequencial de da- 
dos), da Hicom, e o Embramic 2000 
(para auxilio a parapldgicos), da Embra- 
mic, constituiram-se em exemplos de 
um esfor 90 louvavel das empresas do 
ramo de controle de processos. 

Quanto as inova 9 ( 5 es tecnologicas 
propostas e desenvolvidas no pais, des- 
tacaram-se os protocolos de comunica- 
9 ao para interligar microcomputadores 
da linha Apple, entre si e com sistemas 
IBM, o que pode ser considerado como 
um excelente passo em dire^o a comu- 
nica 9 d'o de dados para equipamentos do 
tipo pessoal. 

Outra apresenta 9 So importante fo- 
ram as redes locais, apresentadas pela 
Scopus e outras empresas, como Poly- 
max e Dismac. Essas redes, destinadas 
a manipular dados a curta distancia (cer- 
ca de um a dois quilometros) sem a ne- 
cessidade de usar amplificadores ou re- 



petidores, tern como principal aplica- 
9 ao o escritdrio eletronico, mas podem 
ser utilizadas com outras fmalidades, 
como o controle de processos. 

A excessao dessas experiences, o que 
existe e uma utiliza 9 ao desenfreada de 
programas estrangeiros, estimulada pela 
prdpria compatibilidade do hardware 
nacional. Sem sair do Brasil, o usuario 
pode adquirir os fantasticos cartuchos 
de videojogos ou, se for mais exigente, 
pode obter todo o software grifico do 
maravilhoso TRS Color Computer, ou, 
mesmo, interessantes aplicativos comer- 
ciais, sobretudo para microcomputado- 
res compativeis com o IBM-PC e com o 
Apple. 

Como consequencia, se por um lado 
o usuario ganha, por outro perde a na- 
9 S 0 como um todo (ao permanecer em 
situa 9 ao de dependence tecnologica) e 
as empresas conscientes, capazes e com 
etica que, de fato, desenvolvem produtos. 
A esse respeito, 6 bom frisar que tecno- 
logia se desenvolve, n5o se compra.tan- 
to porque a tecnologia de primeira linha 
nao estd a venda, quanto porque conhe- 
cer tecnologia nao significa que se saiba 
desenvolve-la. 

Fica aqui o nosso respeito aquelas 
empresas que, a despeito da concorren- 
cia desleal, ainda investem em pesquisa 
e desenvolvimento de tecnologia. Nisso, 
as umversidades tern um grande papel a 
desempenhar. 

Laboratdrio 
de Subsistemas In teg rave is 




No lazer, nada mudou 



A exemplo da Feira de 1 982, que se caracterizou por uma enor- 
me profusdo de jogos importados, invadindo atd mesmo os grandes 
equipamentos, a deste ano praticamente nada acrescentou a esse pa- 
norama vazio. Os velhos e desgastados Space Invaders, Cosmic Figh- 
ter, Sabotage e Pac Man continuaram sendo a "grande atragao" da 
maioria dos estandes, na absoluta falta de programas nacionais cria- 
tivos ou aplicativos domisticosuteis. 

As atencoes da industria permanecem fixadas no hardware, en- 
quanto que o usuario de computadores pessoais assiste a uma mul- 
tiplicagao de mdquinas que nao tern o que rodar. Sob este aspecto, 
o micro pessoal no Brasil continua sendo um brinquedo muito caro. 
Jd os videogames - que sao as verdadeiras mdquinas de jogos - se- 



guem a tendencia geraldo setorde emulagaode produtos estrangeiros 
consagrados: indmeros ataris foram langados na Feira, juntamente 
com os seus famosos jogos. 

A drea de software aplicativo domdstico continua sendo um espa- 
qo aberto, d espera de ocupantes. E quern possuir determinagao e 
boas iddias terd, certamente, grande chance de ser bem sucedido. 

Vale aqui destacar o trabalho da Microarte, em especial o M LO- 
GO, que se constitui numa opgao bem interessante a nivel de usua- 
rio pessoal, uma vez que essa duma linguagem voltada para o ensino de 
programagdo para criangas. E conforme argumenta um representan- 
te da empresa, "se a crianga tern que brincar com computadores, 
entao que brinque aprendendo". 
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HARDWARE 



• Fabricado pela Micronix, o Dactron E 
constitui-se num micro bastante versbtil e po- 
deroso. Em sua configuragbo bbsica, vem com 
os seguintes elementos: duas UCPs, 6502 e 
Z80, que o tornam compatfvel com o Apple 
II, Apple II Plus e todos os computadores que 
utilizam o CP/M-80; membria RAM de 64 
Kbytes, expansfvel atb 128 K; tela de 24 ii- 
nhas por 40 ou 80 colunas; balxa resolugao de 
40 x 48 ou 80 x 48 pontos em 16 cores; alta 
resolugao de 280 x 192 pontos em oito co- 
res; saidas de video para monitor, TV (P & B 
ou PAL-M) e RGB analdgico; safda cara im- 
pressora paralela; interface RS232C para ;m- 
pressora, modem e outros perifbricos; inter- 
face para cassete; conexbo para joystick; qua- 
tro conjuntos de caracteres selecionbveis por 
software; seis slots para expansbo; teclado 
profissional com numbrico reduzido, maius- 
culas e minusculas, controle de cursor e en- 
trada para teclado matricial. Entre as expan- 
soes e opcionais constam: disco Winchester de 
5 Mbytes, atb quatro disquetes de 5 1/4" ou 
8", modem, sintetizador de voz, monitor de 
fdsforo verde, impressora serial de 80 e 132 
colunas, joystick, linguagens COBOL, BASIC, 
Pascal, Fortran, Assembler e outras suporta- 
das pelo CP/M da Microsoft, sistemas opera- 
cionais MDOS 3.3, CP/M 2.2 e CP/M 3.0. 

• Diversos perifbricos para o seu micro Naja, 
juntamente com um terminal de video inteli- 
gente, foram os langamentos da Kemitron na 
Feirade Informbtica. 

Dentre eles destacaram-se os seguintes: pla- 
ca para CP/M com memdria RAM de 64 Kby- 
tes (CrS 170 mil); expansbo para video a co- 
res, com 240 matizes e alta resolugdo grbfica 
(Cr$ 230 mil); interfaces de 4 MHz e 6 MHz 
de ciclo de clock para maior velocidade de 
processamento (Cr$ 35 mil, para 4 MHz e 
CrS 130 mil, para 6 MHz); controlador de 
disco flexivel de 8", capaz de aumentar a ca- 
pacidade de armazenamento exterr.o para atb 
4 Mbytes (CrS 330 mil); sintetizador de voz 
(CrS 250 mil). O microcomputador Naja, 
com 48 Kbytes RAM, custa CrS 890 mil e o 
monitor de video de fdsforo vurde, CrS 205 
mil. Todos esses pregossbo acrescidos de 10% 
de I P 1 . A Kemitron langou tambbm na Feira 
uma placa de porta paralela, que permite ligar 
ao micro discos rigidos Winchester compati- 
veis com o TRS-80 mod. III. 

• A Digital tambbm mostrou o seu terminal 
de videotexto, em duas versdes: VDTR (resi- 
dencial) e VDTI (institucional). Ambos os 
modelos podem ser usados com micros pes- 
soais atravbs de um mddulo de expansbo de- 
senvolvido pela empresa. A Digital mostrou 
ainda modems, o equipamento STEP 1 para 
testes em circuitos de comunicagbo de dados e 
o multiplexador estatistico Statmux. 

• Um buffer para impressora, controlado 
por microprocessador, com interfaces parale- 
la ou serial e capacidade de 16 ou 64 Kbytes. 
£ o Bytesspool, fabricado pela Clariton In- 
dustrie a Combrcio Ltda. 

• Boas novas para quern tern mbquina de es- 
crever eletr&nica Remtronic 2000. Acaba de 
ser langada a interface Tekno L6gica, que per- 
mite ligar a mbquina a qualquer micro com 
safda paralela Centronics ou serial RS232C. 

• O Brasil jb fabrica robos em escala indus- 
trial. A princfpio sbo pequenos e dedicados a 
trabalhos leves (podem movimentar 400 gra- 
mas com o brago totalmente estendido, au- 
mentando a sua capacidade b medida em que 
recolhem o brago), mas irmaos maiores vem 



por af, garante a Donner Industria Eletr&nica 
Ltda., do Rio de Janeiro, fabricante do Micro 
Robot Kalt 400. 

O equipamento destina-se a fazer servigos 
leves na industria ou em breas que possam 
comprometer a saude humana, como por 
exemplo: soldas, perfurag&es em circuitos im- 
presses, colocagao de ilhoses, embalagens far- 
maceuticas, servigos repetitivos que exigem 
precisbo, breas com vapores tbxicos, manuseio 
de material radioatlvo, laboratbrios qufmicos 
e dreas de temperatures anormais. O Kalt 400, 
que tern precisbo de ± 2 ddcimos de mil (me- 
tro (ou atd menos, de acordo com a especifi- 
cagbo do usudrio) pode ainda auxiliardeficien- 
tes fisicos ou, mesmo, mostrar-se um bom 
parceiro no jogo de xadrez. 

• Empresa criada pela Prol6gica para absor- 
ver o seu setor de perifdricos, a MicroPerifb- 
ricos apresentou na Feira a sua linha de im- 
pressoras e acionadores de discos. Na drea de 
impressoras foram mostrados os modelos M 
720 (bidirecional de 200 cps, matriz 7x9, in- 
terface serial ou paralela Centronics, buffer 
de 3 K) e M 500 (100 cps, bidirecional, ma- 
triz 9 x 9 ou 6 x 12 para caracteres grdficos, 
interface serial ou paralela e buffer de 2 K). A 
empresa tambbm mostrou os acionadores de 
discos D 500 (para disquetes de 5 1/4", den- 
sidade dupla e face dupla ou simples, compa- 
tivel com Apple e IBM) e W 500 (para Win- 
chester de 5 1/4", com capacidade de armaze- 
namento de 5 MB ou 10 MB). 

• Nesta Feira, a Microlab langou a unidade 
de disco magndtico rigido DM-525, com capa- 
cidade de 25 Mbytes (12,5 MB flxos + 12,5 
MB removiveis) e fez o prb-langamento das 
unidades de disco rigido DM-660 (66 Mbytes), 
DM-9300 e da linha DF-1000 de discos Win- 
chester de 5 1/4", 8" e 14", com langamento 
previsto para o segundo semestre de 1984. 



SOFTWARE 



• A Quartzil nao apresentou langamentos 
nesta III Feira, limitando-se a expor o seu jb 
conhecido QI-800, com CPU Z80 A, 64 K de 
memdria RAM, disquetes de 8" e possibilida- 
de de utilizagao de disco rigido de atb 29 
Mbytes. 

A Spress, contudo, empresa de desenvolvi- 
mento de software coligada, apresentou ao 
publico um sistema para concessionaries de 
vefculos e auto-pegas. Estruturado de forma 
modular, o sistema permite que os mbdulos 
interajam,realimentando cada parte do siste- 
ma. Assim, o mddulo bbsico de vendas emite 
nota fiscal e ativa a baixa do item no mddulo 
de controle do estoque. O mddulo de vendas 
a prazo emite faturas e duplicatas, ativando, a 
seguir, o contas a receber, e assim por diante, 
provendo ainda o sistema, para o Departamen- 
to de Marketing, uma mala direta aos clientes 
cadastrados. 

Segundo a empresa, aproximadamente 12 
concessionaries jb estao utilizando. este soft- 
ware, cujo prego b de 1100 ORTNs, ou 440 
ORTNs/mes, em sistema de leasing. 



• A Interface b uma pequena software-house 
de Petrdpolis, no Estado do Rio de Janeiro, 
que veio b III Feira expor seus pacotes priori- 
tariamente visando um maior contato com 
possiveis distribuidores interessados em seus 
produtos. Os sistemas oferecidos pela empresa 
sbo o Saint Julien, pacote para controle admi- 
nistrative para hotbis ou clinicas hospitalares, 
por 283 ORTNs; o Onix, sistema de contas a 
pagar, por Cr$ 73 mil; o sistema de Estatfsti- 
ca Gera! Haruspice, comercializado a Cr$ 280 




V J 



mil e o Paclab, para registro e controle de pa- 
cientes em laboratbrios de anblises clinicas, 
tambbm orgado em 283 ORTNs 

• Voltada para a brea de gerenciamento de 
empresas, a Computel expos seu aplicativo 
Business-Calc, nas versoes SOM (Cobra-305) e 
MPM (Edisa — 281), exigindo memdria mi- 
nima de 32 Kb. O software constitui-se de 
uma matriz eletronica de 254 linhas e 78 colu- 
nas programbveis pelo usudrio e vem acompa- 
nhado de um manual completo explicando 
como operb-lo. 

• O destaque do estande da Monk Micro 
Informbtica foi, sem duvida, o Data-Manager 
— sistema gerador de programas aplicativos, 
tambbm chamado de SGBD — Sistema Geren- 
ciador de Banco de Dados — para as dreas de: 
administragao geral, financeira, industrial e 
todas onde se fizer necessdrio o arquivamento, 
processamento e consulta de dados em grande 
quantidade e com rapidez. Estiveram tambdm 
em exposigao vdrios outros produtos da em- 
presa, desde programas ligados a Engenharia 
atd aplicagoes domdsticas, jogos e lazer. 

• A Multisoft, que adquiriu no inicio do ano 
a marca Microsoft — fitas de programas para 
equipamentos da linha Sinclair— apresentava 
como langamentos programas para mdquinas 
com 2K (Grand Prix e Gladiador) ; 16 K (O 
Pulo do Sapo) e tambdm jogos para equipa- 
mentos implementados com placa de caracte- 
res programdveis. 

A empresa estd ativando a marca Multisoft 
para venda pelo reembolso, oferecendo aos 
compradores "certificadcs de garantia por 
tempo ilimitado". "Meu problema de garan- 
tia", diz Paulo Lauand, diretor da Multisoft, 
"sao os gravadores dos clientes. Se o gravador 
do cliente come a fita, cobramos 25% do valor 
desta para trocar. Isto diminui o prejufzo". 
Sobre a investida da empresa na drea da co- 
mercializagao, Lauand garante: "No dia que o 
Brasil tiver uma rede de lojas suficientemente 
grande para abranger todo territbrio nacional, 
eu paro de vender direto". 

• Contabilidade e Estoque, rodando em 
equipamentos da linha Apple; no 1-7000, da 
Itautec, e em alguns produtos compatfveis 
com o TRS 80, todos em configuragoes pro- 
fissionais, demonstravam um pouco da filoso- 
fia de atendimento da Servimec: nas palavras 
de Josb Gorgoll, supervisor de sistemas, "tes- 
tar o que existe, fazer um banco de software, 
apbs uma triagem, e procurar oferecer ao 
cliente uma solugao integrada que realmente 
vd de encontro a seus problemas". A empresa 
funciona em termos de Consultoria de compra 
e contratos de manutengao de hardware, soft- 
ware ou ambos. A Servimec trabalha ainda na 
comunicagao de equipamentos linha Apple 
com mdquinas de grande porte, o 6800 da 
Burroughs. 

Atravbs do CEI, o esforgo de langamento 
foi calcado numa'estrutura de cursos para exe- 
cutives, basicamente de 'operagao de aplicati- 



vos', como Dbase e Visicalc, e 'utilizagao de 
micros na solugao de problemas administrati- 
vos'. 

• A Micro's — Assessoria em Processamento 
de Dados apresentou seu software aplicativo 
para a drea de Odontologia, nas versoes para 
fita cassete (capacidade para atd 120 clientes) 
e disquete (capacidade minima de 700 clien- 
tes). Os programas incluem os dados pessoais 
dos clientes, cadastro, emissao de cartas de 
cobranga, recibos de pagamento, etiquetas pa- 
ra mala direta etc. 

• Expondo no estande da Unitron, a Poten- 
cial Software demonstrou sua linha de softwa- 
re para a linha Apple: um curso de BASIC 
(Passo a Passo) e tres sistemas: Folha de Paga- 
mento (desenvolvido exclusivamente para a 
legislagao trabalhista brasileira), Mala Direta 
(podendo arquivar atd 250 cadastros por dis- 
quete) e Controle de Estoque (podendo arma- 
zenar atd 5.500 itens). 

• Criada recentemente em Sao Paulo, a Bi- 
blioteca de Software, um novo conceito de 
empresa na qual o associado passa a dispor de 
cerca de 4 mil programas das mais variadas 
dreas e para os vdrios equipamentos nacionais, 
tambdm esteve presente na Feira. Entre a vas- 
ta lista de programas a BBS conta com Treina- 
mento de Visicalc, Telofacts (teste de conhe- 
cimentos na drea de exatas), Programa para o 
ensino de Basic nfveis I e II etc... 



LOJAS 



• O Brasil Trade Center participou da Feira 
de Informdtica com muitas novidades bastan- 
te criativas e propostas uteis aos usudrios tan- 
to de microcomputadores quanto de videoga- 
mes e videocassetes. 

O grupo criou a Compvideo, comunidade 
de possuidores destes tipos de equipamentos 
e que visa facilitar o acesso dos sbeios ds novas 
mdquinas e ao software, aldm de propor-se a 



publicar um boletim informativo a circular 
entre os associados e oferecer descontos em 
cursos ministrados na loja. 

A empresa ird promover ainda pacotes de 
viagens — Infor Travel — aos principals cen- 
tros de Informdtica norte-americanos em voos 
charters, portanto a menor custo. 

• A Computique apresentou em seu estande 
diversos equipamentos, em sua maioria rodan- 
do software profissional produzido por casas 
independentes. 

Dentre os pacotes mostrados, diversos des- 
tinavam-se a dreas de atividades especfficas. A 
loja revende produtos da software-house ca- 
rioca Compusystems, voltados para as dreas 
mddica, jurfdica, hoteleira, de restaurantes e 
lojas. Aldm disto, a Computique tambdm re- 
vende placas para expansao de membria, vi- 
deo em 80 colunas e implementagao de Z80 
para rodar CP/M, todas fabricadas pela empre- 
sa Logodata. 



• A Microshop, rede de lojas que jd possui 
estabelecimentos em Sao Paulo, Campinas e 
Recife, demonstrava em seu estande os equi- 
pamentos CP-500, da Prologica; API I, da Uni- 
tron e D 8100, da Dismac, apresentando 
como atrativos jogos e, como novidade, um 
sistema de controle financeiro desenvolvido 
pela Libra Informdtica, empresa de desenvol- 
vimento de software coligada. 



• A loja Imards, de Sao Paulo, apresentava 
diversas novidades desenvolvidas pela prbpria 
loja e por "um pessoal ligado d loja", segundo 
Valmir Pereira, Diretor Comercial. 

Dentre elas, MS registrou: video colorido 
para o CP-200; software de comunicagao para 
S-700 (Prolbgica) e API I (Unitron), ao prego 
de 150 ORTNs; sistemas mddicos para mdqui- 
nas com CP/M (desenvolvido pela Matrix e de 
exclusividade de venda Imards); CP-500 com 
alta resolugao (placa da PSI, 100 ORTNs e 
venda exclusiva Imards); CP-500 com CP/M 



(irtcoporagao feita por Cr$ 256 mil); mdqui- 
nas de escrever Olivetti funcionando como 
impressora (com interfaces serial e paralela, 
900 ORTNs) e o circuito eletronico Ivanita 
que, incorporado a maioria dos equipamentos 
da linha Apple, gera caracteres da Lingua Por- 
tuguesa na tela e safda impressa. 

• A Filcres apresentou tambdm muitas novi- 
dades para a linha de equipamentos da Prolb- 
gica. A utilizagao do CP-200 no controle de 
mdquinas fez bastante sucesso e, para o 
CP-500, estavam em demonstragao speed up 
(alta velocidade, atd 5,3 MHz) e drive para 
dupla face, ambos sem previsbo de prego, 
aldm de placa de alta resolugdo, fabricada pela 
STI de Sdo Paulo, ao prego de Cr$ 614 mil. 



• A Compushop, loja especializada na venda 
de micros, fechou dois contratos de franquia, 
para o Rio de Janeiro e Londrina, e seu dire- 
tor Roberto Riwczes colocou como um dos 
principals objetivos para a presenga da loja no 
evento, aldm de marcar presenga, "o contato 
com eventuate interessados para sistema de 
franquia em outros Estados do Brasil". 

Outra empresa do grupo, a Compusoft, 
tern prevista, para o ano de 84, uma intensifi- 
cagao no desenvolvimento de software. Atd Id, 
a Compushop procura construir em torno de 
si uma imagem bastante sdrla e profissional, 
com relagao ao software: "Nao damos progra- 
mas de brindes e nao vendemos software 
estrangeiro ou chupado". 

• A Chip Shop, uma loja de microcompu- 
tadores de Sao Paulo, langou em seu estande o 
cartao CP/M para o CP-500. A implantagao da 
placa e do software serao feitos na prbpria 
Chip Shop e o prego d de Cr$ 1 50 mil. Outras 
novidades apresentadas pela loja foram a co- 
municagbo entre um Apple e um IBM (emula- 
gao 2789 e 3270) e a comunicagao entre dois 
Apples. 



A OPIN/AO DAS ENTIDADES 



SUCESU 



□ Na opinido de Renato Mazzola, da 
Sucesu Sdo Paulo, a presenga maciga 
do pbblico na III Feira, com estacionamen- 
tos lotados e onibus vindos do interior espe- 
cialmente para o evento, demonstra o in- 
teresse que a Informdtica desperta hoje. Se- 
gundo ele, isto acontece gragas a orientagao 
que vem desde o primeiro Congresso, rea- 
lizado em 1968, e a. Feira paralela, entao 
com 300 m2. Quanto d crescente presenga 
do micro na vida brasileira, Mazzola classifi- 
ca como tendencia da dpoca, ressalvando 
pordm que o usudrio brasileiro hoje ainda 
ndo estd preparado para os equipamentos de 
16 bits, "nem mesmo a industria estd", con- 
clui. 



APPD 



□ Para Luzia Portinari, da Associagdo dos 
Profissionais de Processamento de Da- 
dos de Sao Paulo, o tamanho da Feira, o nii- 
mero de pessoas presentes e tudo o que foi 
exposto demonstrou, mais uma vez, a neces- 
sidade da urgente regulamentagdo da profis- 
sdo, "atd mesmo para estabelecer fronteiras 
entre o profissional, o usudrio e o amador". 
Segundo ela, a presenga marcante de micro- 
computadores entre os langamentos d uma 



tendencia natural por questdb de demanda 
e de prego, devendo, no entanto, haver em 
breve uma selegdo do prbprio mercado. Para 
Luzia, o mercado jd estd preparado para re- 
ceber os micros de 16 bits, apesar das possi- 
bllidades dos equipamentos de 8 bits ainda 
ndo terem sido totalmente exploradas. 
"Mas tambdm ndo podemos ficar esperando 
que isto acontega -para entdo evoluir", afir- 
ma. 



ABICOMP 



□ Segundo o Presidente da Associagao 
das Indiistrias de Computadores, Edson 
Fregni, a Feira deste ano mostrou uma in- 
dustria nacional mais amadurecida tecnolo- 
gicamente, em termos de acabamento de 
produto e mesmo em termos de atendimen- 
to ao publico. Mas, um aspecto negativo 
apontado por Edson Fregni foi a pirataria, 
ou seja, equipamentos trazidos do exterior 
e simplesmente copiados. Para Fregni, este 
tipo de colsa causa dois maleficios diretos: 
primeiro, rouba o mercado das empresas que 
estao investindo em tecnologia, e segundo 
forma uma md Imagem da industria nacio- 
nal, fazendo com que cada vez pienos em- 
presas apbiem a reserva de mercado. Na opi- 
niao do Presidente da Abicomp, a tendencia 
b que o prbprio usubrio comece a selecionar 
e deixar de comprar os equipamentos pi- 
rateados, tendendo para as maquinas desen- 
volvidas aqui, para as quais ele tern maior 
suporte. "Albm disso", completa Fregni, "as 
empresas que estao sob o manto da reserva 



de mercado tern obrigagao de desenvolver 
tecnologia e nSo buscar qualquer outra for- 
ma rentbvel". 



ASSESPRO 



□ "O publico que compareceu ao Infor- 
mbtica 83 b procura de software certa- 
mente se sentiu agredtdo com a quantidade 
de produtos pirateados e a ausencia de apli- 
cativos novos e s&rios. Isso foi um dado 
muito negativo, mas, em contrapartlda, pro- 
vocou uma mobilizagSo de toda a classe, e 
acredito que do prbprio governo, para a ne- 
cessidade urgente de uma polfticade regula- 
mentagao da produgSo de software no 
pafs." 

A declaragao b do Presidente da Asses- 
pro, Josb Maria Sobrinho, para quern a Feira 
demonstrou, mais uma vez, o alto grau de 
desenvolvimento da Industria de equipamen- 
tos no pais. "Tivemos muitos langamentos 
na brea de hardware, inclusive os micros de 
16 bits, o que acredito ser um primeiro pas- 
so para o amadurecimento na produgao des- 
ses equipamentos no Brasil". 

Sobrinho destacou tambbm a ausbneia 
dos pequenos fabricantes de software, 
"aqueles que nbo tern condigSes de montar 
um estande na Feira para apresentar seus 
produtos, mas que s§o os que mais produ- 
zem seriamente, sem pirataria". Pensando 
nisso, jb faz parte dos pianos da Assespro 
montar um grande estande no prbximo 
evento para-reunir os pequenos fabricantes 
num sistema de divisao de custos. 
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Abre-se o leque de opgoes 



C omo nao podia deixar de ser, muitos perifericos foram apresenta- tam terminals com monitores coloridos de alta resolugao (Brascom, 

dos nesta Feira oferecendo ao usuario uma serie de opgoes atra- Prologica), devendo esta experiencia se acentuar tal como no exterior. 

tivas ’ Terminals com facilidades para processamento de texto tambem foram 

Diversos fabricantes apresentaram novas impressoras, muitas delas apresentados, ampliando as op^oes do mercado. 
com capacidade de impressao grafica. Nao podemos deixar de mencio- Diversas empresas ja anunciaram sintetizadores de voz, embora to- 
nar as tradicionais Elebra, Elgin e Globus. Embora seja grande a quanti- dos eles possuam urn inconfundi'vel sotaque estrangeiro. Esperamos que 

dade de novos produtos, todoseles possuem uma semelhan?a funcional no futuro tenhamos sintetizadores com algum genui'no sotaque brasi- 

muito grande, no que o usuario sai ganhando, uma vez que o campo de leiro. Esses dispositivos seguramente colocarao cm outra escala o pro- 

opcoes permite uma sele^ao mais rigorosa do que se deseja. blema da comuriica^ao homem-maquina. 

Fizeram-se presentes as impressoras do tipo margarida e esfera (IBM Nao se pode deixar de citar a mesa digitalizadora apresentada pela 

- SELETRIC), muito adequadas para impressao de textos de alta quali- Universidade Federal do Rio Grande do Sul, inegavelmente de grande 
dade. importancia na area da computasao grafica. 

Como novidade, podemos citar a graficadora (plotter) da Prologica, Embora na quase totalidade todos os projetos citados sejam genui- 
cmbora algumas universidades tenham ou estejam desenvolvendo gra- namente nacionais, notamos que existe um grande vazio no aspecto cle- 
ficadores (alguns ja em fase de industrializa^ao). tro-mecanico,* area na qual dependemos quase totalmente do exterior. 

Nos novos terminais de video alfanumericos, graficos e semigrafi- Dizemos quase porque o panorama, necessariamente, ira mudar com os 

cos, observou-se a preocupacao dos fabricantes quanto a aspectos er- motores de passo desenvolvidos pela Escola de Engenharia de Sao Car- 

gonometricos, e em prover maior in tehgencia local. Observaram-se diver- los (USP), justificando um maior incentivo ao desenvolvimento de 

sos terminais nacionais emulando o IBM PC, como por exemplo os da mccanica fina no pais. 

Scopus (com algumas caractensticas melhores, inclusive). A Scopus 

tambem apresentou seu terminal grafico colorido, baseado no poderoso - r 

controlador grafico 7220 (NEC-INTEL). Alguns fabricantes ja apresen- Laboratdrio de Subsistemas Integrals 



DISCOS MA GNETICOS 

Cresce a familia de 5 1/4” flexiveis 

discos flexiveis de 5 1/4” que existem no mcr- 
cado. 

A Elebra e Multidigit lansaram o mini 
floppy de 1 Mb, com densidade de 96 tpi. 0 
modelo DF 0111, da Multidigit, no entanto.e' 
de meia altura (slim), isto e, duas unidades po- 
dem ser montadas no lugar de um mini floppy 
normal. 

A Flexidisk e a Elebra tambe'm apresenta- 
ram ao publico mini floppies compativeis com 
microcomputadores pessoais tipo Apple e 
TRS-80. Essas unidades ja vem acondiciona- 
das numa caixa de metal com os acessorios ne- 
cessarios para liga^ao direta aos micros, nao 
exigindo adaptaqoes de hardware ou software. 

Os modelos 9408B/C da Elebra saoequipa- 
dos com solenoide de HD LOAD, que evita 
um maior desgaste no disquete. 

Sendo um mercado basicamente dirigido 
aos microcomputadores, novas empresas, co- 
mo a Microperifericos, tern investido no de- 



NOS RIGIDOS, POUCO AVAN^O 

Esse segmento atende ao mercado nacio- 
nal de microcomputadores (pessoais, profes- 
sionals e mesmo supermicros) e minicompu- 
tadores (inclusive superminis), motivo pelo 
qual existem grandes diferen^as nos produtos 
quanto a tecnologia, custo, performance, ca- 
pacidade, tamanho e operacionalidade. 

Os discos rigidos nacionais se dividem ba- 
sicamente em dois grupos:a familia de 5 1/4”, 
representada por unidades de tecnologia Win- 
chester, e a familia de 14”, de tecnologia de 
vanguarda, proprias para minicomputadores 
pela media e alta performance e capacidade, e 
pre?os e custos de manuten$ao elevados. 

Todos os discos rigidos de 5 1/4” sao utili- 
zados em micro'computadores sendo portanto 
abordados aqui, em detrimento dos de 14”. 



Fabricante 


ELEBRA 


FLEXIDISK 


MICROPERIFERICOS 


MULTIDIGIT 


Modelo 


9**08A 


9**08B 


9A08C 


BR 500 


BR 550 


D 500 


OF 01 II 


Tamanho 


Normal 


Normal 


Normal 


Norma l_ 


Normal 


Normal 


Slim 


Face (S ou 0) 


S 


0 


0 


S 


0 


S/0 


D 


Capacidade Maxima 


250 Kb 


500 Kb 


1 Mb 


250 Kb 


500 Kb 


250/500 Kb 


1 Mb 


Tempo Accsso Medio 


80 ms 


80 ms 


132 ms 


275 ms* 


275 ms* 


• 


• 


Tempo Acomodajao 


15 ms 


15 ms 


15 ms 


* 


• 


• 


• 


Tempo HO LOAO 


- 


50 ms** 


50 ms** 


- 


- 


- 


- 


Densidade Radial 


A8 TPI 


A8 TPI 


96 TPI 


A8 TPI 


<•8 TPI 


A8 TPI 


96 TPI 


Taxa Transf. (MFM) 


250 Kb/s 


250 Kb/s 


250 Kb/s 


250 Kb/s 


250 Kb/s 


250 Kb/s 


250 Kb/s 


Lan^amen to 


Nao 


Nao 


Sim 


NSo 


Nao 


Sim 


Sim 


0BS . : *lncl*ui'do o tempo de acomoda^ao 



••equipados com solenoide de HO LOAD 
■ dados nao fornecidos 

Figura 1 - Discos flexiveis de 5 1 /4" 



Q uern esperava por muitas novidades na 
area de discos magneticos nesta III Fei- 
ra de Informatica pdr certo ficou um 
pouco decepcionado. O que acontece e que o 
desenvolvimento dos discos, flexiveis ou rigi- 
dos, ainda e muito restrito devido as dificulda- 
des de produijao, custo ferramental, equi- 
pamentos e dependencia de importa^ao de pe- 
?as criticas como cabe 9 as, discos, atuadores e 
motores. Esses problemas de fabricagao foram 
inclusive comprovados pela desistencia de al- 
guns produtos anunciados na Feira do ano 
passado. 

NOS FLEXIVEIS, NOVOS MODELOS 
No mercado de floppy disks, proprios para 
microcomputadores, temos duas familias: a de 
5 1/4” c a de 8”. As maiores novidades con- 
centraram-se na familia de 5 1/4”, que basi- 
camente 6 utilizada em micros pessoais. Veja 
na figura 1 os modelos c caractensticas dos 



senvolvimento de floppies de 5 1/4”. Este 
segmento, em breve, devera atingir 2 Mb de 
capacidade. 

A familia de disquetes de 8” e Iargamente 
utilizada em microcomputadores profissionais, 
principalmente devido ao padrao de formata- 
gao (IBM). Nesse segmento as empresas na- 
cionais apenas aperfeigoaram os produtos ja 
existentes, uma vez que produtos de 2 e 5 Mb 
anunciados nos EUA ainda apresentam alguns 
problemas te'cnicos, principalmente na quali- 
dade do disquete. Veja na figura 2 os modelos 
e caractensticas dos disquetes de 8” que exis- 
tem no mercado. 

O BR 860, da Flexidisk, foi o unico lan- 
gamento nessa familia. Por ser do tipo slim, 
duas unidades podem ser montadas no espago 
de uma unidade normal de 8". O motor de 
acionamento e do tipo DC sem escovas, eli- 
minando a necessidade de alimentagao AC. O 
BR 860, como a maioria dos mini floppies, 
nao possui solenoide de HD LOAD, necessi- 
tando ativar o motor DC de acionamento, jun- 
to com a selegao (DS) da unidade para evitar 
o desgaste do disquete. O tempo de partida do 
motor de acionamento atrasa (em aproxima- 
damente 100 ms) o inicio da transmissao de 
dados em relagao as unidades tradicionais. 



58 



MICRO SISTEMAS, novembro/83 



Nesse segmento de 5 1 /4” existem dois grupos: 
de atuador tipo stepper e de atuador tipo voi- 
ce coil. Veja na figura 3 os modelos e caracte- 
nsticas dos discos rigidos de 5 1/4” que exis- 
tem no mercado. 

A Flexidisk langou o BR 419 (15 Mb nao 
formatador), que permitira a ampliagao de sis- 
temas ja equipados com unidades de 5 a 10 
Mb. A Multidigit devera tambem fomecer em 
breve um produto equivalente, de 15 Mb. A 
tendencia dessa familia, no entanto, e chegar 
a 20 Mb, como o ST 425.americano, que ja te- 
ve melhorias no desempenho utilizando o me- 
todo de seeks (steps) bufferizados. Ambos fa- 
bricantes oferecem controladores para suas 
unidades com interface de 8 bits, que permi- 
tem a ligagao em cadeia com mini floppies. 

A Elebra anundou o Iangamento de seu 
Winchester com atuador voice coil, sistema de 
servo e capacidade de at^ 36 Mb. Essa versao 
devera atender aos microcomputadores que 
necessitam de maior capacidade e desempe- 
nho, hoje servidos apenas pelas canssimas uni- 
dades de 5 + 5 Mb e CMD-32 Mb. 



Figura 2 - 
Discos 
flexiveis 
de 8” 



Fabricante 


ELEBRA 


FLEXIDISK 


Modelo 


9<(0<i 


9A06 


BR 800 


BR 850 


BR 860 


Tamanho 


Norma 1 


Normal 


Normal 


Norma 1 


Slim 


Face (S ou D) 


S 


-D 


S 


D 


D 


Capacidade Maxima 


800 Kb 


1,6 Mb 


800 Kb 


1 ,6 Mb 


1,6 Mb 


Tempo Acesso Medio 


268 ms* 


91 ms* 


210 ms* 


91 ms* 


9 1 ms* 


Tempo Acomodasao 


15 ms 


15 ms 


8 ms 


1 5 ms 


1 5 ms 


Tempo HD LOAD 


60 ms 


35 ms 


35 ms 


50 ms 


- 


Densidade Radial 


L 8 TPI 


48 TPI 


L 8 TPI 


A 8 TPI 


L 8 TPI 


Taxa Transf. (MFM) 


500 Kb/s 


500 Kb/s 


500 Kb/s 


500 Kb/s 


500 Kb/s 


Lan^amento 


Nao 


Nao 


Nao 


Nao 


Sim 


OBS.: * inciu'do o tempo de acomodasao 



O mercado nadonal nao vive ainda a “ex- 
plosao” dos Winchester devido aos elevados 
custos de investimentos e dificuldades de pro- 
dugao local. Da mesma forma, a restricao ope- 
racional pela indefinigao e forma de back-up 
para unidades de maior capacidade tambe'm 
cerceiam o avango rapido desse segmento do 



mercado. A unidade de fita cartucho BKP-20, 
langada pela Conpart, ja devera em breve pos- 
sibilitar copias de Winchester ate aproximada- 
mente 50 Mb, e espera-se que futuros desen- 
volvimentos de outras unidades de back-up 
aparegam no mercado nacional. 

Ulrich Kuhn 



Fabricante 


FLEXIDISK 


MICROPERIFERICOS 


HULTI DIGIT 


ELEBRA 


Mode 1 o 


BR 906/41 2 


BR 419 


W500 


WD 0511 


DU 0512 


ow ion 


W500 


Capacidade (nao format.) 


6,38/12.76 M 


19,14 Mb 


6,38/12,76 Mb 


6,38 Mb 


6,38 Mb 


12,76 Mb 


21 ,77/36.29 Mb 


Atuador 


Stepper 


Stepper 


Stepper 


Stepper 


Stepper 


Stepper 


Rotary Voce Col 1 


N9 de Faces 


4 


6 


• 


4 


2 


4 


3*IServo/5+l Servo 


Tempo Acesso Medio 


70 ms 


70 ms 


• 


150 ms 


70 ms 


70 ms 


45 ms 


Tempo Acomodasao 


1 5 ms 


15 ms 


• 


20 ms 


15 ms 


i 5 ms 


- 


Tempo Medio Latencla 


8,3 ms 


8,3 ms 


8,3 rns 


8,3 ms 


8,3 ms 


8,3 ms 


8,3 ms 


Densidade Radial 


TPI 


345 TPI 


• 


255 TPI 




345 TPI 


800 TPI 


Taxa Transferencia 


5 Mbits/s 


5 Mbits/s 


5 Mbits/s 


5 Mbits/s 


5 Mb/s 


5 Mb/s 


5 Hb/S 


Interface 


ST 400/500 


ST 400/500 


ST 400/500 


ST 400/500 


ST 400/500 


ST 400/500 


ST 400/500 


Lansamento 


Nao 


Sim 


Sim 


Nao 


Nao 


Nao 


Sim 



Figura 3 - 
Discos 
rigidos 
de 51/4" 



0BS.: • dados nio fornecidos 




Aldm de mostrar novidades nas suas im- 
pressoras matriciais, a Elebra Informatica fez 
o prd-langamento de diversos produtos a se- 
rem comer cializados no decorrer de 1 984. 

A Monica (100 cps, 80 colunas), por 
exemplo, pode agora ser reconfigurada de di- 
versas maneiras pela adigao de mddulos de cir- 
cuito com firmwares especificos. A Alice (200 
cps, 136 colunas) foi mostrada com interfaces 
serial ou paralela e controle eletronico por 
microprocessador. A Emilia (100 cps, 132 co- 
lunas e capacidade grdfica) t a mb dm esteve 
presente. 

Na drea de discos flexiveis de 5 1 /4" desta- 
caram-se as unidades 9408, com cabega dupla 
e capacidade de 500 Kbytes, e os Hordrios, 
acionadores jd prontos para utilizagao pelo 
usudrio final nos micros das linhas Apple e 
TRS-80. 

Os pregos aproximados desses produtos 
sao: Monica (Cr$ 960 mil), Emilia (Cr$ 2,8 
milhoes), Alice (Cr$ 4 milhoes), Hordcio para 
Apple (Cr$ 630 mil) e Hordcio para TRS-80 
(CrS 730 mil). 




BR 406 • BR 860 

A Flexidisk mostrou a sua linha de aciona- 
dores de discos flexiveis e rigidos e de contro- 
ladores. Os langamentos ficaram por conta 
dos acionadores BR 860 (para disquetes de 8” 
dupla face /densidade simples, com capacidade 
de 800 K a 1600 K, unidade compacta tipo 
slim) e BR 406 (para Winchesters de 5 1/4" 
com 5 MB formatado ou 6 MB nao formata- 
do). 

Os outros acionadores mostrados foram os 
seguintes: para disquetes de 8” - BR 800 
(400 a 800 Kbytes, face simples /densidade 
simples ou dupla); BR 850 (800 a 1600 Kby- 
tes, dupla face /densidade simples); para dis- 
quetes de 5 1/4” - BR 500 L (125 a 250 
Kbytes face e densidade simples); BR 550 
(2 So a 500 K, dupla face, densidade simples); 
BR 390 (compativel com Apple, face e densi- 
dade simples ); BR 392 ( versao do BR 390, 
com caixa e cabo, pronto para utilizacao pelo 
usudrio final); Winchesters de 5 1/4” - BR 
412 (10 Mbytes formatado ou 12 Mbytes nao 
formatado); BR 419 (15 Mbytes formatado 
ou 19 Mbytes nao formatado). 

A empresa mostrou ainda o controlador 
formatador BR 41 (para disquetes de 5 1/4’’ 
ou 8") e o controlador acionador BR 1410 
(para discos rigidos Winchester). 




A Elgin Lady e os modelos MT-1401 e 
MT-140L foram as impressoras que a Elgin 
Eletronica levou para a Feira de Informatica. 

Impressora matricial de 1 00 CPS e 132 co- 
lunas a 10 cpi, matriz de pontos 9 x 7, a 



Elgin Lady permite programar, atravds de uma 
unica tec la, 18 fungoes para definigdo do for- 
ma to de impressao (11 d essas fungoes podem 



tambdm ser programadas via computador). 
Tern caracteres semi-graficos e fungoes grdfi- 
cas com enderegamento a nivel de agulhas e 
possui interfaces intercambiaveis a nivel de 
operador que possibilitam a sua conexao a 
maioria dos sistemas disponiveis no mercado. 
Seu prego d de Cr$ 1,9 milhdo. 

A MT-1401 (Cr$ 2,3 milhoes) d tambdm 
matricial, 160 CPS, 132 colunas, matriz 9x7. 
Permite ativar 30 fungoes para definigdo de 
formato de impressao (13 das quais por com- 
putador) e dispoe de uma serie de conjuntos 
de caracteres. A MT-140L reune todas as ca- 
racteristicas da MT-1401, podendo ainda pro- 
cessor textos.com matriz 18x40 e um confun- 
to de 128 caracteres de Lingua Portuguesa. O 
seu prego e de CrS 3 milhoes. 
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M101/88 



Nexus 

No estande da Scopus foi apresentada uma sirie de novidades, 
sendo as principals o Nexus, o micro da Scopus de 16 bits, e a rede lo- 
cal. A rede local possibilita a interligagao de microcomputadores entre 
si, de forma a obter um compartilhamento de recursos. Podem ser liga- 
dos d rede local Scopus ati 300 mdquinas, dependendo do tipo de apli- 
cagdo. 0 micro Nexus tern CPU com microprocessador Intel 8088, com 
8 MHz e 6 compatlvel com o IBM PC. Sua configuragao bdsica vem com 
256 K de RAM, dois drives para disquetes de 5 1/4", dupla face e dupla 
densidade e monitor de video de fdsforo verde. Seu prego de comercia- 
lizagdo fica por volta de 1. 700 ORTNs, e atravis de placa de expansdo o 
Nexus jd pode receber discos Winchester de 5 ou 10 Mb. Outros langa- 
mentos da Scopus foram o terminal video grafico a cores, que se liga a 
qualquer micro com satda RS 232C, e a famflia de terminals ET, com- 
pativeis com equipamentos da IBM. 



HARDWARE 



Super micros de 16 bits, 
as grandes vedetes 



O bservamos que, embora o vo- 
lume de produtos apresentados 
nesta Feira de Informrftica te- 
nha sido consideravelmente elevado, 
boa parte destes limitaram-se a copiar 
produtos estrangeiros, pouco contri- 
buindo para o avan?o tecnol6gico do 
pais. 

Diversas empresas apresentaram mi- 
crocomputadores compativeis com o 
Apple, utilizando todo o vasto reperto- 
rio de programas dispomveis para este 
microcomputador. Foram apresentadas 
placas opcionais com UCP Z-80 e UCP 
8088 que permitem, respectivamente, 
instala95o dos sistemas operacionais CP/ 
M 80 e CP/M 86, permitindo compatibi- 
lidade com outros microcomputadores 
que utilizem estes sistemas operacionais. 

Alguns microcomputadores compati- 
veis com o conhecido IBM-PC (UCP 
8088) se fizeram presentes na Feira de 
Informdtica, sendo muito bem aceitos 
pelos visitantes. Estes microcomputado- 
res devem repetir aqui no Brasil o gran- 
de sucesso alcan 9 ado no exterior. Des- 
contando o monitor de alta resoluijao 



do microcomputador matriz, estas ver- 
soes nacionais pouco ou nada, aparente- 
mente, ficam a dever. 0 Nexus 1600, da 
Scopus, utiliza um sistema operacional 
desenvolvido pela empresa, sendo com- 
patlvel com o MS-DOS. O EGO, micro- 
computador da Softec, pode operar com 
diversos sistemas operacionais, incluindo 
CP/M-86 e MS DOS, o mesmo ocorren- 
do com o PC 2001 da Micro tec. 

Sistemas multiusudrios e multiprogra- 
maveis, assim como redes de microcom- 
putadores, foram oferecidos por diversas 
empresas, destacando-se a rede local da 
Scopus, rede Brascom e CETUS - dentre 
outras. 

Pelo menos duas empresas jd anuncia- 
ram microcomputadores de 16 bits ba- 
seados na UCP 68000 com sistema ope- 
racional tipo UND(. Estes verdadeiros 
super-microcomputadores deverao, em 
breve, oferecer ao usudrio uma nova di- 
mensao de possibilidades e aplica^es. A 
Edisa espera a libera?ao da SEI para a 
produ^So de microcomputadores basea- 
dos no 68000. A Brascom oferece uma 
placa de UCP Z-80-68000 ( dual proces- 



sed 



sor) que pode ser utilizada no sistema 
BR1000 com pelo menos 256 bytes de 
memdria. Embora a capacidade da UCP 
68000, em rela^o a UCP 8088 ou 
8086, seja indiscutivelmente maior, pro- 
vavelmente o software aplicativo colo- 
cado a disposifdo dos microcomputado- 
res da linha PC-IBM deve decidir o mer- 
cado no prdximo ano. 

Com rela^o as universidades, desta- 
camos o controle numdrico de tomos 
para ensino desenvolvido pela Universi- 
dade Federal do Espirito Santo; o siste- 
ma de processamento distribuido para 
controle e supervisee de trens desenvol- 
vido pela Funda 9 So para Desenvolvi- 
mento Tecnol6gico (EPUSP); terminais 
grdficos e sistemas de desenvolvimento 
universal para microprocessadores de- 
senvolvidos pelo Laboratdrio de Subsis- 
temas Integrdveis (EPUSP) e os termi- 
nais grdficos do NCE (UFRJ), dentre 
outros. 



Laboratdrio de 
Sub sistemas !ntegr£veis 



Com um novo visual em toda a sua linha, bem mais funcional e agra- 
davel, a Schumec langou o microcomputador Ml 01 /8a, com micropro- 
cessador Intel 8088, de 16 bits, ati 256 Kbytes de memdria e sistema 
operacional CP/M-86. O Ml 01/88 - que custa cerca de Cr$ 7 milhoes 
em sua configuragao bdsica de UCP com 64 K RAM, duas interfaces de 
comunicagao RS 232C, barra de comunicagao S-100, controlador para 
ati quatro acionadores de disquete de 5 1 14” ou 8” - opera atualmente 
sd no modo monousuario, mas a Schumec promete para breve uma pla- 
ca para tornd-lo multiusudrio. 

Outro micro mostrado foi o M101/85, que tern microprocessador 
Intel 8085 de 8 bits. A sua memdria 6 de 64 K RAM, podendo ser ex- 
pand id a por chaveamento ati 128 K. Roda sob o sistema operacional 
MP/M e aceita as linguagens BASIC (interpretado e compilado), COBOL 
ANSI, Pascal (compilado), Fortran e MUMPS. Trata-se de um sistema 
multiusudrio que suporta ati 16 videos com 16 impressoras. Tern duas 
interfaces RS 232C, barramento S-100 e controlador para ati quatro 
acionadores de disquetes de 5 1/4" ou 8". Seu prego -base 4 de Cr$ 6,5 
milhoes. 

Ambos os modelos podem, opcionalmente, ser dotados de controla- 
dores para ati quatro acionadores de discos rigidos de 6 ou 12 MBytes. 



O Ego, microcomputador de 16 bits langado no infeio deste ano, re- 
cebe agora uma placa adicional de multiplexagao de terminais. passando 
a funcionar tambim como multiusudrio. Alim desta novidade, a Softec 
apresentou na Feira o processo de emulagao 32-78, para ligagao do EGO 
a computadores de grande porte como IBM 4341. 



"A IBM veio mostrar sua tecnologia e o Pocket Computer faz parte 
desta tecnologia". Esta era a explicagao mais frequente ouvida por parte 
dos funciondrios da IBM quando questionados do porque de exporum 
equipamento que nao pode ser comer cializado no pais. Quanto a futu- 
ras associagoes da IBM com empresas nacionais, foram muitos os boa- 
tos que circularam durante o Informdtica'83 , mas por enquanto nada 
foi confirmado. No maior estande da feira, com cerca de 800 m', a 
IBM trouxe o que de mais moderno a empresa vem produzindo, inclusi- 
ve com uma mostra semelhante d que foi apresentada no ultimo NCC. 
Alim do Tiinel da Tecnologia, que mostrava a evolugao nesta area, a 
outra atragao foi o prdprio PC. O Pocket Computer da IBM trabalha 
com processador Intel 8088, de 16 bits e tern memdria inicialde 64 Kb 
de RAM, expanslvel ati 640 Kb, atravis de placas intemas de 64 Kb 
cada. Sua configuragao bdsica vem com um drive para disquete de 
5 1/4", face simples ou dUpla e densidade simples ou dupla, com 320 
ou 360 Kb, podendo receber tambim ati duas unidades de discos 
Winchester de 10 Mb. Seu teclado 4 alfanumirico com mais 10 teclas de 
fungoes: video monocromdtico ou colorido, com possibilidade de liga- 
gao d TV comum: salda serial ou paralela para impressora e funciona 
com as linguagens: BASIC, COBOL, APL, FORTRAN e Pascal. 



Entre os novos equipamentos com microprocessadores de 16 bits, 
uma das novidades foi o PC 2001, da empresa paulista Microtec. O PC 
2001 4 compatlvel em hardware e software com o PC da IBM. O 2001 
trabalha com microprocessador Intel 8088 de 16 bits com velocidade de 
5 MHz, tern memdria ROM inicial de 8 expanslvel ati 40 Kbytes, e a 
memdria disponivel para o usuario vai de 128 Kbytes de RAM podendo 
chegar ati 1 Mbyte. Em sua versao mais simples, o PC 2001 esta sendo 
comercializado com dois drives para disquetes de 5 1 /4" face e densida- 
de simples, monitor de video em fdsforo verde e satda RS 232 para im- 
pressora serial, podendo o cliente optar por salda paralela. Nesta confi- 
guragao, o PC 2001 custa 1.208 ORTNs e mais 50 ORTNs para os que 
quiserem drives para disquetes de dupla face e dupla densidade. O 2001 
pode funcionar tambim como multiusudrio atravis da instalagdo de 
uma placa que aceita 8 terminais. O equipamento comporta ati duas 
destas placas, atingindo portanto 16 terminais. 

Outro langamento da Microtec foi o MT 400, uma versao mais com- 
pleta do MT 300, que possui visor de cristal liquido de 24 caracteres; 
memdria RAM varia de 8 a 32 Kbytes; tern 16 K de Interpretador 
BASIC: aceita cassete e impressora serial, e segundo seu fabricante, no 
futuro poderd usar tambim disquetes. O MT 400 pode ser usado como 
micro pessoal, como coletor de dados, terminal de vendas e para acesso 
a banco de dados, entre outras coisas. Seu prego 4 de 80 ORTNs. 



m 



i 



* 



A Zanthus tambim langou na Feira seu micro de 16 bits. Trata-se do 



Z-2200, conj processador Intel 8088, compatlvel com IBM PC, memdria 
inicial de 128 Khvtes dois drives para aisauetes de 5 1/4". face sim- 



inicial de 128 Kbytes, dois drives para disquetes de 5 1/4", face sim- 
ples e dupla densidade (aceita tambim disquetes de 8” e wichester de 5 
e 10 Mbytes), video teclado e impressora a partir de 100 CPS. Nesta 
versao inicial o Z 2200 custa 2 mil ORTNs. 
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TECNOLOGIA 











Uma festa de pequeno 

valor tecnico 



0 111 Feira International de In- 
formdtica marcou uma grande 
expansao no numero de exposi- 
tores e do publico visitante. Cada fabri- 
cate procurou mostrar o que tinha de 
melhor no setor de desenvolvimento tec- 
nolbgico. 

Em nossa opiniao, entretanto, o nu- 
mero de novos desenvolvimentos feitos 
pela industria national 6 deceptionante, 
preferindo a maior parte das empresas 
realizar a c6pia pura e simples de pro- 
dutos e sistemas programationais estran- 
geiros. 0 apelo excessivo a atra?5es tipo 
jogos e luzes deleita o grande publico, 
mas tern certamente pouco valor t^cni- 
co, parecendo a Feira um imenso circo. 
Poder-se-ia dizer que os fabricantes da 
area de informatica preferiram substituir 
as pesquisas em micro pelas microssaias 
das recepcionistas!!! 

Entretanto podemos, dentro das in- 
dustrias nationais, citar honrosas exce- 
95es: a Scopus com o lamjamento do 
Nexus 1600 deu um passo gigantesco 
para o dominio do mercado national de 
16 bits. Esta empresa destacou-se tam- 
bdm pelo lan?amento de seus terminais 
grdficos TVG 4001 e TVA 3279, com 
tubo em cores de alta resolu^ao. Outro 
ponto elevado da Feira foi a Itaucom, 
que apresentou seu circuito integrado 
dedicado, totalmente projetado no Bra-, 
sil e difundido nos E.U.A. Destaca-se 
que este circuito satisfez totalmente as 



caracteristicas dele pretendidas, tendo 
substituido totalmente um cartao im- 
presso TTL. Nos testes dinamicos, este 
circuito apresentou no oscilador em anel 
um atraso de 5 ns por inversor NMOS 
carga deple^ao. 

Como outros destaques, podemos ci- 
tar o terminal de video semigrafico da 
Videotec e o robo desenvolvido pela 
Robot-Kalt-400. 

As multinationals, como sempre, rea- 
lizaram seu espetaculo a parte. Como 
maior efeito tecnologico podemos citar 
o HP-9000, com seu microprocessador 
de 32 bits e 450.000 componentes, da 
Hewlett Packard, e a IBM, com seu pai- 
nel piano a gds com 10.000 pontos de 
tela e sua memdria de 512 Kbits. Cha- 
mam tamtern a atengao as estates de 
projeto Intergraph, Computer Vision e 
Control Data. 

Nas estatais, destacam-se a Telebras 
entrando no campo dos CIs semidedica- 
dos, a FINEP por sua dedicado a tecno- 
logia nacional e a SERPRO, tamWm en- 
volvendo-se na area de desenvolvimento 
tecnoldgico. 

Como nos demais anos, a Universida- 
de esteve a frente do desenvolvimento 
tecnoldgico de ponta. Neste ano, entre- 
tanto, as universidades fora de Sao Pau- 
lo contaram com muito pouco recurso 
para partitipar da Feira, sendo seus es- 
tandes muito humildes. Na exposicao, 
destacaram-se os seguintes trabalhos: 



GaAs e de InP/InGaAsP do LPD — UNI- 
CAMP; a rede local de comunica^o de 
dados REDPUC, da PUC do Rio de Ja- 
neiro; o nucleo de processamento dis- 
tribuido FEPASA/FDTE; os terminais 
grdficos do LSI; o Sistema de Tratamen- 
to de Imagens do INPE; os motores de 
passo desenvolvidos pelo DEE-ESC, USP, 
Sao Carlos; o Cromatdgrafo a gds desen- 
volvido pela Escola de Engenharia Maua'/ 
Instrumentos Cientificos C.G.Ltda. e o 
Ultra-sonografo bidimensional 4BD 
criado pela FUNBEC. 

Com rela?5o ao Congresso propria- 
mente dito, os trabalhos nationais nao 
foram, de modo geral, considerados de 
bom nfvel, sendo que ouvimos vdrias 
criticas sobre a qualidade desses traba- 
lhos. As conferences internacionais fo- 
ram consideradas de nivel mddio a bom. 
Outrossim, algumas conferences tive- 
ram seu hordrio alterado e outras can- 
celadas, o que tambem prejudicou um 
pouco a qualidade do Congresso. 

Sem duvida, pordm, o saldo do XVI 
Congresso da SUCESU foi bastante posi- 
tivo para a maior parte dos participan- 
tes. Acreditamos que a III Feira foi de 
grande valia para o grande publico, ten- 
do, todavia, pouco interesse tdcnico es- 
pecializado, a ndo ser pelos contatos que 
foram realizados entre os proprios expo- 
sitores. 

Joao Antonio Zuffo 



Nesta edigao, participaram na categoria de convidados especiais de MS os seguintes profissionais: do Laboratdriu de 
Subsistemas Integraveis da EPUSP, Joao Antonio Zuffo, Sergio Takeo Kofugi, Oscar Benedicto Jr., Oswaldo Cristo e 
Luis Sergio Moreira; Rudolf o Homer Jr., da Potencial Software; Renato Degiovani, de Micro Sistemas, e Ulrich Kuhn, da 
Digirede. 

Participaram ainda da cobertura do evento Alda Surerus Campos, Stela Lachtermacher, Claudia Salles Ramalho, Ri- 
cardo Inojosa e Nelson Jumo, e da edigao do cademo, Edna Araripe, todos da equipe jornalfstica de Micro Sistemas. m 
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hscreva 

o seu Unitron 
no piano de 
expansao, 

Estes sao os pianos de expansao para o seu Unitron ap II. 

Sem demora nem fila de espera, basta voce fazer a inscri^ao que 
eles come^am a funcionar imediatamente. 

Plano 1 - Expansao de memoria com + 32 ou + 64 ou + 128K. 

Plano 2 • Impressora paralela de textos ou grdficos. 

Piano 3 - Microprocessador adicional Z - 80 (CP/M). 

Plano 4 • Videocom40ou80caracteresporlinha. 

Plano 5 - Interface RS-232C para impressora ou comuniccx^oes 

(ligo^ao via MODEM - redes ou grandes computadores). 

Plano 6 * Disco f lexivel de 5 1 /4" ou 8" - (isolodos ou simultaneos) . 

Plano 7- Disco rigido (Winchester 5Mb). 

Plano 8 - Saida de video a cores PAL-Mou RGB. 

Plano 9 - Sintetizador de voz e sons. 

Plano 10 - Digitolizadordeimogens. 

expansao ap 11 

Mais um servi^o Unitron. 
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Uma breve apresentagao sobre Astrologia e, para os usuarios do Apple, 
um programa para o calculo do Signo Ascend ente 



O micro entre os astros do zodiaco 

Luiz Roberto Barboza de Oliveira 



saber astrol6gico 4 um saber 
ancestral. De cinco mil anos da- 
tam os primeiros documentos 
(que se referem, por sua vez, a muitos 
outros antigos registros...). Os fenome- 
nos cdsmicos sempre intrig aram o espi- 
rito humano. Sua natureza ciclica — des- 
coberta nada 6bvia de pacientes e ela- 
boradissimas observagbes — encontram 
inevitdveis paralelos no piano da vida 
aqui em baixo. Assim como Hesiodo, 
em Os Trabalhos e os Dias, dd-nos conta 
de quanto o quotidiano da antiguidade 
pulsava em umssono com o ciclo solar, 
da mesma forma, em nossos dias, na di- 
mensSo imediata do observavel, a in- 
suspeita Fisiologia dd-nos conta de inu- 
merdveis exemplos de fungbes biolbgi- 
cas que vibram em harmonia com os 
mais ex6ticos relbgios cdsmicos. So be- 
low as above... 

Relativamente ao Conhecimento do 
Homem, seguiu a Astrologia caminhos 
in de pen dentes, mas nao conflitantes, 
com as atuais Ciencias Humanas. Apro- 
ximou-se melhor do projeto de Bache- 
lard, porque jamais perdeu a vis5o do 
Todo. Na vertente da Histdria, anteci- 
pou de milenios a concepgao ciclica de 
Spengler e Toynbee ; na vertente social e 
economica, procurou predizer os perio- 
dos de escassez e de guerras, preparan- 
do, deste modo, a sociedade para en- 
frenta-los; na vertente psfquica, procla- 
mou sempre o Gnoo Seauton (versao em 
latim do que em grego significa “Conhe- 
ga-te a ti mesmo”). 



Relativamente a Mecanica Celeste e 2 
Astronomia, pode-se dizer que devem 
seu nascimento e grande parte de seus 
resultados a Astrologia, tomando-se dis- 
ciplines independentes apenas quando 
da formulagSo das leis de Kepler e New- 
ton, alids astrdlogos de extensas obras, 
cuidadosamente encobertas primeiro pe- 
la Contra-Reforma, depois pela lnstitui- 
gao Cientifica. 

Mesmo assim, a Astrologia (e bem as- 
sim todos os saberes que nSo se inseri- 
ram explicitamente no discurso do po- 
der ou que o amea 5 aram no seu jugo) 
foi relegada a condigao de contracultu- 
ra, perseguida ou marginalizada tanto 
pela ideologia crista quanto pela ideolo- 
gia da revolugfo burguesa que a suce- 
deu. Assim, a Ciencia Oficial passou a 
ser a exdusiva distribuidora dos estatu- 
tos de cientificidade como se fossem in- 
dulgences plenarias, e manteve cassado, 
entre outros, o da Astrologia. 

Hoje, as vdsperas da Era de Aquirio, 
os tempos estSo mudando. Uma nova 
Astrologia — dita Humanistica - vem 
eclodindo em todos os cantos do globo, 
promovida muitas vezes por doutas pes- 
soas, antes insuspeitas perante a Ciencia 
Oficial: fisicos, psicblogos, analistas, 
matematicos, cientistas sociais e outros 
tantos de notbrio saber. Karl Gustav 
Jung foi o pioneiro, mas segue-se-lhe 
uma lista intermindvel que n2o cessa de 
se ampliar. 




0 COMPUTADOR 
NA ASTROLOGIA 

Do que foi exposto at 4 agora, depre- 
ende-se que o computador pode prestar 
inestimaves servigos ao astrblogo. Ape- 
nas nSo pode substitui-lo... Com efeito, 
toda a calculeira das Posigbes Astrais, 
dos Aspectos e das Casas pode ser a ele 
delegada; toda a trabalheira de andlise 
de pontos m^dios, sinastria, cartas com- 
positas, transitos, progressbes e outras 
tdcnicas e recursos. A arte de interpre- 
tar, todavia, a vis2o holfstica e sintdtica, 
forga maior do m^todo astrolbgico, cor- 
responde a talentos n2o programdveis e , 
portanto, escasso ou nenhum socorro 
pode a eles ser prestado pela mdquina. 

Antes de passarmos ao programa para 

0 cdlculo do Ascendente, o qual lista- 
mos a seguir, podemos citar entre ou- 
tras aplicagbes: 

1 - Program as para o calculo das Posi- 
goes Astrais. Estes calculo s sdo astro- 
nomicos, e, como a Astrologia exige pre- 
cisao para uma larga faixa de tempo (da 
ordem de um s4culo), os algoritmos sdo 
longos e sofisticados, pois devem levar 
em conta perturbagoes de ordens su- 
periors nas drbitas dos planetas. Este 
problema esbarra um pouco nos limites 
dos microcomputadores, podendo por 
eles ser resolvido se limitarmos nossas 
exigencias. 

2 — Program as para o cilculo das Casas 
Mundanas. Sdo programas de menor 
porte, mas ndo de menor sofisticagdo. 
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devido, de um lado, a multiplicidade de 
m4todos de calculo de Casas, sobre os 
quais a Astrologia ainda ndo estabeleceu 
consenso, e, de outro lado, a dificuldade 
de se encontrar literatura sobre os algo- 
ritmos de calculo das mesmas. 

3 - Programas para o calculo dos As- 
pectos. Sdo programas triviais, a partir 
das Posigoes Astrais. 0 mais delicado 
nesta classe de programas 4 estabelecer 
as orbes (intervalos de confianga), den- 
tro das quais as relagoes angulares sdo 
consideradas validas, pois cada astrdlogo 
tern a sua prdtica e as suas justificativas 
pessoais. 

4 - Programas ditos de “interpretagao”. 
Sdo, na verdade, editores de texto asso- 
ciados a uma base de dados textuais, 
previamente montada ou fornecida. Evi- 
dentemente que o talento para identifi- 
car as posigoes e aspectos dominantes de 
uma carta esta longe de ser algoritmiza- 
vel. Assim, os produtos finais das “in- 
terpretagdes” automatizadas estdo con- 
denados a ser meramente indicativos e 
seccionalmente m topes... — o que ndo 
Ikes tira totalmente o interesse. 0 pri- 
meiro destes programas, implantado ha 



muitos anos em Paris, foi o Astroflash. 
Seus resultados, sem ser desprezi- 
veis, ndo sdo excepcionais, sobretudo 
pela orientagao dos textos da base. 0 
problema, todavia, 4 maior que um mi- 
cro, devido, sobretudo, as dimensoes da 
base de dados. 

PROGRAMA PARA 
O CALCULO DO ASCENDENTE 
As pessoas, em geral, conhecem seu 
Signo Solar, pois ele depende apenas do 
dia do. seu aniversario, exceto, talvez, 
em dias de mudanga de signo, quando o 
ano e a hora de nascimento tamb^m in- 
tervem. 

0 Signo Solar 6 importante, porque 
a energia radiante do Sol representa o 
arqudtipo da vontade, da forga vital, da 
auto-express5o, da integridade e do or- 
gulho do ser. 0 Sol representa tambe'm 
o arqudtipo do heroi, das formas da luz. 
A nivel material, o Sold a energia ffsica. 
A nivel psfquico, ele 4 a energia da Libi- 
do Junguiana, a energia bdsica que ali- 
menta todas as fungbes psicologicas. 

Mas o Signo Solar nSo 6 o unico sig- 
no proeminente da carta natal: o signo 
onde se encontra o Ponto Ascendente 



(i.e., o signo do zodiaco que estava le- 
vantando no horizonte no momento e 
no local de seu nascimento) 6 singular- 
mente importante. 0 Ascendente sim- 
boliza sua persona (no sentido de Jung), 
sua mascara (significado da palavra 
etrusca persona ), a maneira como voce 
se mostra aos outros, o personagem que 
voce representa, inclusive sua aparencia 
fisica (e com ela sua saude e vitalidade)'. 
£ a parte do seu Eu que o intermedia 
com o mundo. Por isso, o Ascendente 
representa muitas vezes sua auto-ima- 
gem, tanto quanto sua persona. Estes 
motivos fazem com que as pessoas do- 
tadas de intuigao astrologica tenham, 
em um primeiro contato, mais facilida- 
de em reconhecer o Signo Ascendente 
do que o Signo Solar de alguem. 

Como muitas pessoas normalmente 
tern curiosidade de saber seu Signo As- 
cendente sem ter que recorrer a tabelas 
dificeis de encontrar e a calculos no mi- 
nimo fastidiosos, ocorreu-nos publicar 
este programa para ilustrar, com um 
exemplo ao mesmo tempo util e n 2 o 
muito extenso, o emprego do micro- 
computador em Astrologia. Se voce tern 



A linguagem e o m&todo astrologico 



Na sua expressSo mais simples, a Astrologia iida com quatro 
categorias de simbolos: os Astros, os Signos, as Casas e os Aspec- 
tos. 

Os Astros (Sol, Lua, Mercurio, Venus, Marte, Jupiter e Satur- 
no - mais recentemente Urano, Netuno e Plutao) representam 
energias, vibragoes. 

Os Signos do Zodiaco (Aries, Touro, Gemeos, Cancer, Leao, 
Virgem, Libra, EscorpiSo, Sagitario, Capricomio. Aquario e 
Pcixes) constituem um sistema absoluto de referenda, fixo no 
ceu, em relagao ao qual sSo determinadas as posigoes dos outros 
elementos. Cada Signo e um Iugar de forga, um modulador de 
energia dos Astros. Sao segmentos iguais, de 309 cada um, em 
tomo da esfera celeste, medidos sobre o piano da echptica a 
partir do Ponto Vernal. Outrora (ha dois mil e quinhentos anos) 
coinddiam os Signos com as Constelagdes que Ihes deram os no- 
mes. Hoje, devido a Precessao dos Equinodos (movimento do ei- 
xo da Terra com periodos de 25.400 anos), houve um certo des- 
locamento, estando o Signo de Aries, por exemplo, ocupado pela 
Constelagao de Peixes, ja em vias de ceder lugar a de Aquario. 

As Casas Terrestres (Casas I, II, III, IV, V, VI, VII, VIII, IX, 
X, XI, XII) constituem, por sua vez, um sistema local de refe- 
renda, em relagao ao qual sao tambem determinadas as posigoes 
dos Astros. Este sistema local 6 centrado no fato, no evento, 
enquanto ponto de espago-tempo terrestre: o seu instante e o 
seu lugar na superfide da Terra. Cada Casa representa uma fa- 
ceta do fato, uma dimensao do evento. Por exemplo: na carta 
natal de uma pessoa, a Casa III representa a mente, a capaddade 
de comunicar-se, pequenas viagens, irmaos e vizinhos; a Casa 
VII, as relagoes a dois, o casamento, os sodos, o julgamento que 
os outros fazem dele; a Casa XI, as amizades verdadeiras, o amor 
que se recebe, os ideais, e assim por diante. A presenga de um 



Astro numa Casa imprime a energia dele na dimensSo ou area por 
ele presidida. 

As Relagoes Angulares ou Aspectos, por fim, correspondem 
as combinagoes de energia dos Astros entre si. Com efeito, os 
prindpais Aspectos que os luminares podem formar entre si, 
segundo suas posigdes relativas ao redor do Zodiaco, sao: conjun- 
gao (09); oposigao (1809 ); trigono (1209); quadrature (909) 
e sextilha (609). Conjungoes representam somas diretas das ener- 
gias dos Astros que mantem esta relagao angular. Sao Aspectos 
fortes e permanentes, quase sempre positivos. Trigonos e sexti- 
Ihas sao Aspectos harmonicos, os primeiros estaveis e os segun- 
dos dinamicos. Oposigoes e quadraturas sao Aspectos mais difi- 
ceis, e representam interferencias de energias e vibragoes, gerado- 
ras, por vezes, de tensdes e de crises. Considerados Aspectos ma- 
leficos at6 bem pouco tempo, estao perdendo esta conotagao e 
sendo tidos como oportunidades de crescimento e de desenvol- 
vimento interior, como as crises normalmente o sao, quando 
bem resolvidas. 

Astros, Signos, Casas e Aspectos sao, pois, os simbolos basi- 
cos com os quais a Astrologia articula o seu discurso. Tomemos 
um evento - seu nascimento, por exemplo. Neste mesmo instan- 
te e deste mesmo lugar os Astros farao um desenho na esfera ce- 
leste : a sua carta natal. Mero acaso? Nao. Nada acontece por aca- 
so. Ha, diria Jung, uma sincronicidade entre voce e sua assinatu- 
ra astral. Suas energias, suas vibragdes, sua musica interior, suas 
intencoes, seu papel, sua missao, seus possiveis, os recursos, en- 
fim, fisicos, emocionais, mentais e espirituais com que voce veio 
a esta vida estao, de alguma forma, impressos no desenho que se 
formou nos ce'us para recebe-lo. Desvendar este misterio para vo- 
ce melhor se conhecer, e assim desenvolver e reatizar as suas po- 
tencialidades na sua plenitude, tal 6 a finalidade desta nova As- 
trologia. 
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0 MICRO ENTRE OS ASTROS DO ZODIACO 




Seduzido e abandonado. 



Esta e a historia do cavalheiro que comprou 
um microcomputador que ia resolver todos 
os problemas da sua empresa. 

O pregin ho era bom e a con versa do 
vendedor, atraente. Poucos dias depois ele 
descobriu que o equipamento nao resolvia 
todos os problemas (pelo contrario, criava 
alguns novos) e pior de tudo, ao voitar a loja 
onde tinha comprado, percebeu que ninguem 
entendia realmente do assunto. 

Em outras palavras, ele foi lamentavelmente 
seduzido e abandonado. Mas nem tudo esta 
perdido: basta consultar a 
Microshop antes de comprar um 
microcomputador. 

A Microshop ouve antes de falar. 

Micros sao formidaveis, desde que sejam 
recomendados exatamente para as suas 
necessidades. 



Porisso nos fazemos todo tipo de 
perguntas sobre a sua atividade, e o 
tratamento das informagoes para podermos 
acelerar o processo de tomada de decisdes. 
Nos achamos que quanto mais soubermos 
sobre o seu problema, mais facil e completa 
sera a nossa solugao. 

A Microshop da opinioes sinceras. 

Trabalhamos com todas as marcas e modelos 
importantes e nao temos interesse em 
“empurrar” esta ou aquela marca. Assim, 
voce tern a certeza de receber 
sempre um opiniao independente. 

A Microshop resolve mesmo. 

Ao inves de um simples balconista bem- 
intencionado, nos atendemos voce com gente 
formada em Computer Science na 
Universidade de Nova York. 



Isso que dizer orientagao 
inteligente e correta na escolha do 
software mais adequado (tambern 
desenvolvemos programas especificos para as 
suas necessidades). Significa tambem colocar 
a sua disposigao nossa longa experiencia com 
profissionais liberais, empresas de pequeno 
porte e multinacionais. E mais: damos 
treinamento completo na utilizagao dos 
micros e softwares. 

Venha conversar conosco. Nos podemos lhe 
seduzir, mas nao vamos nunca lhe abandonar. 






op 

'ernes. I 



A loja dos micros inteligentes. 



acesso a qualquer micro compativel com 
o Apple (ou ao prriprio) experimente-o 
e descubra o seu e o Ascendente de seus 
amigos. 

Para o calculo do Signo Ascendente e 
mister conhecer: 

a) a data de nascimento; 

b) a hora de nascimento (com a maior 
exatidao possivel, pois a cada 20 minu- 
tos o Ascendente varia, em m£dia, 5 
graus); 

c) a latitude, a longitude e o fuso hora- 
rio do local de nascimento. 



0 calculo, por exemplo. do Ascen- 
dente de utna pessoa nascida a 5/6/1977,, 
as 21 :30 horas, no Rio de Janeiro - RJ 
(latitude Sul 22 graus e 54 minutos; lon- 
gitude West de Greenwich 43 graus e 13 
minutos; fuso horario + 3h) dara, como 
resultado, Aquario. Em 1977 nao houve 
horario de verao no Brasil (ver box em 
anexo). 

Havendo interesse em saber o grau 
exato do Ascendente em Aquario, deve- 
se digitar < T > para terminar, e, 
em seguida, diante do cursor, PRINT 



Hit a rim fir* 1931/32 - de 11 h de 3/10/31 a 24 h de 31/3/32 

yuaaro ae 1932/33 - ae 0 h de 3/10/32 a 24 h ae 31/3/33 

hnrarios 1949/so - ae 0 h ae 1/12/49 a 24 h de 15/4/50 

noranub 1950 / 51 -aeohde 1/12/50 a 24 h ae 31/3/51 

de verao 1951/52 - de 0 h dc 1/12/51 a 24 h de 31/3/52 
UCVCIdU 1952/53 _ dc 0hdel/12 /52 a 24 h de 28/2/53 

no Brasil 1963/64 - apenas para os estados de Sao Paulo Rjo de Janeiro 
Guanabara, tspirito Santo e Minas: de 0 h de 23/12/63 a _4 n 

1963/64**- para o resto do Brasil: de 0 h de 9/12/63 a 24 h de 
29/2/64 

1965 - de 0 h de 31/1/65 a 24 h de 31/3/65 
1965/66 - de 0 h de 1/12/65 a 24 h de 28/2/66 
1966/67 - de 0 h de 1/11/66 a 28/2/67 
1967/68 - de 0 h de 1/11/67 a 24 h de 29/2/68 



DG. A resposta do sistema sera o grau 
desejado. 
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0 MICRO ENTRE OS... 



10 REM ************************* 
20 REM * CALCULO DO ASCENDENTE * 
30 .REM **** ASTROSCI ENT I A ***** 
40 REM ***CAIXA POSTAL 34044 *** 
50 REM **** RIO DE JANEIRO ***** 



60 REM ************************* 

70 POKE 34,0 

100 DIM Sl*<12) ,DM-/.<13) 

110 DATA 0,31 , ARI ES , 5? ,TOURO , 90 
, GEMEOS , 1 20 , CANCER ,151, LEAO , 
181 .Vl'RGEM, 212, LIBRA, 243, ESC 
ORP I AO , 273 , SAG I TAR 10,304, CAP 
RI CORNI 0 , 334 , AQUARI 0 , 365 , PEI 
XES 

120 READ DMX<0): FOR I = 1 TO 12 
i READ DMX<I),SI*(I> : NEXT 
130 PL = .01 74532925 :BL* = ■ 

“ :Bt = CHR* (7) 

140 DEF FN SKX) = SIN (X * PL 



DEF FN CO(X) 
) 

DEF FN TA(X) 



COS <X * PL 



TAN CX * PL 



170 DEF FN AR(X) = ATN (X) / P 
L 

180 DEF FN MO(X) = (X / MO - INT 
<X / MO) ) • * MO . 

200 REM ***PROGRAMA PRINCIPAL*** 

-210 GOSUB 300: GOSUB. 600 : HOME : 

GOSUB 800: GOTO 210 

290 REM 

300 REM *** ENTRADA DE DADOS *** 

310 HOME : INVERSE : VTAB 1: PRINT 
BL*;" ENTRE COM AS SEGUINTE 
S INFORMACOES: * ; BL* : NORMAL 

: POKE 34,18 

320 GOSUB 400: HOME : GOSUB 410: 

HOME : GOSUB 430: HOME : GOSUB 
470: GOSUB 480: GOSUB 510: GOSUB 
540: HOME : GOSUB 580: RETURN 

330 HOME 

400 VTAB 18: INVERSE : PRINT "<1 
> N 0 M E : 

■ : NORMAL : VTAB 20 
: INPUT NO*: VTAB 5: PRINT " 

<1> NOME : " jNO* | LEFT* <<BL 
* ♦ BL* > , 69 - LEN (NO*>>: RETURN 

410 VTAB 18: INVERSE l PRINT ■ <2 

1 DATA DE NASCIMENTO 1* : NORMAL 
: VTAB 20: INPUT "D I A <1 
A 31 ) : “ | A* : DD = UAL <A*> : 

IF DD < 1 OR DD > 31 THEN PRINT 
8*: GOTO 410 

413 VTAB 21: INPUT "M E S (1 A 

12) : " ; A* : MM = VAL <A*> : IF 
MM < 1 OR MM > 12 THEN PRINT 
6*: GOTO 413 

416 VTAB 22: INPUT “ANO <1900-20 
00) : " j A* : AA = VAL <A*> : IF 
AA < 1900 OR AA > 2000 THEN 
PRINT B*: GOTO 416 

420 VTAB 7: PRINT " <2> DATA DE N 
ASC1MENT0 : “ ; DD ; “/" jMM ; ; 

AA •, * " : RETURN 

430 VTAB 18: INVEPSE : PRINT " <3 
> HORA LOCAL DO NASCIMENTO : 

" : NORMAL : VTAB 2 
0: INPUT "HORA <0 A 23) 

: " ;A*:HH = VAL (A*): IF ASC 
(A*) < 47 OR ASC < A* ) > 57 CR 
HH < 0 OR HH > 23 THEN PRINT 
B*: GOTO 430 



•Calculo do Ascendente ■ 



440 'VTAB 21: INPUT "MINUTO <0 
A 59) : " j A* :MS = VAL <A*>: 

IF ASC <A*> < 47 OR ASC < 

A*) > 57 OR MS < 0 OR MS > 5 
9 THEN PRINT B* : GOTO 440 
450 VTAB 22: INPUT “HORA DE VERA 
0 < S/N) : " ;V*: IF V* < > ’ 

S" AND V* < > “N" THEN PRINT 

E*: GOTO 450 

455 HV* = “ “: IF V* = "S" THEN 

HV* = "H.V." 

460 'VTAB 9: PRINT “ <3> HORA DO N 
ASCIMENTC : * ; HH ; • H ";MS;"'" 
j ' “ j HV* : RETURN 

470 VTAB 18: INVERSE : PRINT " <4 

> LOCAL DE NASCIMENTO - CIDA 
DE NATAL : “ : NORMAL : VTAB 2 
0: INPUT NC*: HOME 

475 VTAB 11: PRINT ■ <4> Cl DADE N 
ATAL : "jNC*; LEFT* <<8L* ♦. 

BL*) ,61 - LEN <NC*> > : RETURN 

480 VTAB 18: INVERSE : PRINT ■ <5 

> LOCAL DE NASCIMENTO - LATI 

TUDE : " : NORMAL : VTAB 2 

0: INPUT -HEMISFERIO <N/S> : 

• ;N»: IF N* < > “S“ AND N* 

< > "N" THEN PRINT B* : GOTO 

480 

490 VTAB 21: INPUT "G R A U S <0 
A 39) : " jA* : GG = VAL <A») 

: IF ASC < A*> < 47 OR ASC 
(A*) > '57 OR GG < 0 OR GG > 

89 THEN PRINT B* : GOTO 490 
500 VTAB 22: INPUT “MINUTOS <0 
A 59) : " ; A* : MT = VAL <A») 

: IF ASC <A*> < 47 OR ASC 
(A*) > 57 OR MT < 0 OR MT > 

59 THEN PRINT B* : GOTO 500 
505 VTAB 13: PRINT “ <5> LATITUDE 
: " ; GG ; " G " ;N*;" * ;MT ; * ' " 

5 ■ ■ : RETURN 

510 HOME : VTAB 18: INVERSE : PRINT 
• <6> LOCAL DE NASCIMENTO - L 
ONGITUDE : * : NORMAL : VTAB 

20: INPUT "HEMISFERIO <W/E> 

: " ;E*: IF E* < \ "W" AND E 
* < > "E" THEN PRINT B*: GOTO 
510 

520 VTAB 21: INPUT "G R A U S <0 
A 179): " ; A* : GN = VAL <A*> 

: IF ASC <A*> < 47 OR ASC 
(A*) > 57 OR GN < 0 OR GN > 

179 THEN PRINT B* : GOTO 520 

530 VTAB 22: INPUT "MINUTOS <0 
A 59) : " j A* : MN = VAL <A*> 

: IF ASC < A* > < 47 OR. ASC 
<A*> > 57 OR MN < 0 OR MN > 

59 THEN PRINT B* : GOTO 530: 

HOME 

535 VTAB 14: PRINT " <6> LONGITUD 
E : " ; GN ; " G " iE*;" " j MN • * ' " 

5 " " : HOME : RETURN 

540 VTAB 18: INVERSE : PRINT " <7 

> LOCAL DE NASCIMENTO - FUSO 
HORARIO :": NORMAL : VTAB 2 

0: INPUT "FUSO HORARIO (-12 
A +12) : " ;FF: IF FF < - 12 

OR FF > 12 THEN PRINT B* : GOTO 
540 

550 VTAB 16: PRINT "<7) FUSO HOR 

ARI 0 : * jFF; " ": HOME : RETURN 

580 VTAB 18: INVERSE : PRINT " <E 

> EDITA CAMPOS <C 

> CALCULA " : NORMAL : GET RE 

*: IF RE* < > "E" AND RE* < 

> "C" THEN PRINT B* : GOTO 
580 

585 IF RE* = "C" THEN RETURN 
590 VTAB 18: INVERSE : PRINT “NU 



MERO DO CAMPO A EDITAR : 

" : NORMAL : GET A* 

: IF ASC < A* ) < 49 OR ASC 
<A*> > 55 THEN PRINT B* : GOTO 
590 

593 CP = VAL (A*): ON CP GOSUB 4 
00,410,430 ,470,480,510,540 
596 HOME : GOTO 580 

599 REM 

600 REM *** ROTI.NA DE CALCULO ** 
610 REM 

620 REM *** 1) OBLIQ.DA ECLIP.** 

625 HH = HH + FF : IF V* = "S" THEN 
HH = HH - 1 

630 AA = AA - 1900 :DJ = AA * 365 + 
INT <AA / 4) + DMX.CMM - I) + 
<DD - .5) + (HH ♦ MS / 60) / 
24: IF <<AA / 4 - INT < AA / 

4) > = 0) AND (MM < 3) AND (A 

A < >0) THEN DJ = DJ - 1 

640 T = DJ / 36525: OB = 23.452294 
44 - .0130125 * T 
650 REM *** 2) TEMPO SIDERAL *** 



670 HS = 18.64606555 + 2400.05126 
2 * T ♦ (.0929 / 3600.) * T * 

2 :MO = 24 : HS - FN MO(HS) 

680 IF HS < 0 THEN HS = HS ♦ 24: 

GOTO 670 

690 AS = (HH ♦ MS / 60) ♦ 12:AS = 

FN MO (AS) :-LN = (GN ♦ MN / 6 
0): IF E* = "W" THEN LN = 36 
0. - LN 

695 TS = HS + AS + LN / 15:TS = FN 
MO(TS) 

700 REM ***** 3) ASCENDENTE **** 

710 REM 

720 MO = 360: AO = FN M0<90. ♦ TS 

• 1 5 . ) : LT = GG ♦ MT / 60 : IF 
N* = "S" THEN LT = 360 - LT 

730 MO = 360 :AO = FN MO(AO) :AN = 

FN AR< FN TA(LT) /' FN CO(A 
0>>:LG = FN ARC FN TA(AO) * 

FN CO(AN) / FN CO(AN ♦ OB) 

) 

740 IF LG < 0 THEN LG = LG . ♦ 180 

750 IF FN SI (AO) < 0 THEN LG = 

LG ♦ 180 
760 RETURN 

800 REM *** SAIDA DE DADOS ***** 

810 REM 

820 VTAB 1 : INVERSE : PRINT " 

ASTROSCI ENTI 
A " j BL* j * R E S U 

LTADOS PARA 
" : NORMAL 

830 MO = 30 : DG = FN MO(LG):S = INT 
<1_G / 30) ♦ 1: VTAB IS: PRINT 
BL* 

840 INVERSE : VTAB 19: HTAB 10: PRINT 

• ASCENDENTE " : HTAB 

10: PRINT " EM 

": HTAB 10: PRINT LEFT* 

( BL* , ( 20 - LEN <SI*(S>>) / 

2) ; S I * < S > | LEFT* <BL*,<20.5 - 
<20 - LEN <SI*<S)>) / 2 - LEN 
<SI*(S)))> : NORMAL 
850 VTAB 23: INPUT " <R> RECOME 

CA <T> TERMINA :" ;R 

E*: IF RE* = "R" THEN POKE 
34,0: HOME : RETURN 
855 IF RE* = "" THEN POKE 34,23 
: PRINT B*: GOTO 850 
860 POKE 34,0: HOME : VTAB 12: PRINT 

• ATE LOGO E OBRIGAD 
0.": VTAB 23: HTAB 27: PRINT 
■ASTROSCI ENTIA" : END 



Detalhes 
sobre o programa 

0 programa e dividido em tres partes: 

• de 10 a 180 - Dimensionamento de va- 
riaveis indexadas, dados fixos e definigao 
de (undoes especiais. 



• de 200 a 210 - Programa principal. 

• de 300 a 860 - Sub-rotinas de entrada 
de dados, de calculo e de saida de dados. 

Estas sub-rotinas, por sua vez, subdivi- 
dem-se da seguinte maneira: 

• de 300 a 596 - Rotina de entrada e edi- 
cao de dados: cabe^alho e programa (300- 
330); nome (400); data de nascimento 
(410-420); hora de nascimento (430-460) ; 



local de nascimento (470-550) e edi?ao de 
campos (580-596). 

• de 600 a 760 - Rotina de calculo: calcu- 
lo da obliquidade da echptica (620-640); 
calculo do tempo sideral do nascimento 
(670-695) e calculo do Ascendente (700 - 
760). 

• de 800 a 860 - Rotina de saida de da- 
dos. ■ 
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Voce esta a f im de 
um programinha 
ou procure uma 
relapao duradoura? 

Programas, voce encontra em qualquer lugar. 

Uma bela embalagem, um papo envolvente e 
pronto: parece que aquele software e o seu micro 
foram feitos um para o outro. 

Mas quando surge o primeiro problema, voce 
fica abandonado como uma noiva no altar. 

Por isso, antes de voce entrar numa aventura, 
converse com os tecnicos da Victori. 

So a Victori tern easy ware: uma linha completa 
de sistemas administrativos que acompanha sua 
empresa em todas as suas necessidades. 

Por tras do easyware, a Victori oferece suporte 
tecnico permanente, que vai desde um manual 
completo e detalhado para o usuario ate um servigo 
de consultas telefonicas em linha direta com os 
nossos tecnicos. A chamada e gratis. 



E por tras da Victori, voce tern o respaldo de um 
solido grupo de empresas.que garante a continuida- 
de e o aperfeigoamento permanente dos produtos. 
Entre em contato com a Victori. 

Voce vai ver que uma relagao duradoura e muito 
mais tranquila e economica que esses programi- 
nhas inconsequentes. 

Linha direta com os tecnicos da 

VICTORI 

Eletrdnica Ltda. 

Rio - 294-5497 
Grande S. Paulo - 255-8808 








Um programs e uma interface para fazer o CP-500 programar o liga-desliga 
de apare/hos etetricos na hora que voce desejar 



Faca de seu CP-500 
uma Maquina do Tempo 



— Unhas 470-520 - Sub-rotina que permite a selefSo de uma 
das duas mensagens jd citadas, que ficarSo piscando na tela 
com a frequencia de 0,5 Hz, “amarradas” ao contador de se- 
gundos do relogio interno. 

— Unhas 540-560 — Sub-rotina para impressSo, a cada minu- 
to, do tempo real na tela. 

A INTERFACE 

0 circuito associado a porta que controla o acionamento do 
motor do gravador nao tern capacidade, por razSes obvias, de 
manobrar grandes tensGes ou correntes, nSo podendo, em hi- 
potese alguma, acionar diretamente equipamentos alimentados 
pela rede de 1 10 V. Esta limita^o pode ser facilmente contor- 
nada atravds da constru 9 <Io da pequena interface mostrada na 
figura 2, que permitird o acionamento de cargas maiores, e 
cujo material pode ser facilmente encontrado em qualquer loja 
de material eletronico (sugiro um passeio &s ruas Repubhca do 
Libano, no Rio, e Santa Ifigema, em Sao Paulo). 



D1 — Diodo tipo 1N4001 ou equivalente. Aten^ao para a 
polandade correta! 

T1 - “Rabicho” com tomada macho para 1 10V. 

T2 — Tomada femea para 1 10V, a qua! sera ligada a carga a ser 
acionada. 

FI — Fusivel miniatura 10A. 

Diversos - Placa e/ou caixa para montagem dos componentes, 
suporte e conector para a bateria de 9V (ou para o “limitador”, 
conforme o caso), suporte para o fusivel FI etc. 

CONCLUSAO 

Espero ter contribuido com esta aplica^o para aumentar 
ainda mais a utilidade de nosso CP-500, que me parece ser li- 
mitada apenas pela imagina^o. Terei prazer em receber noti- 
cias relatando aplicaijCes e/ou modifica95es, bem como ajudar 
aos eletricamente menos dotados quanto a montagem da in- 
terface. Escrevam para a Reda 9 ffo de MICRO SISTEMAS, que 
procurarei atender a todos dentro de minhas possibilidades. 



Roberto Quito de Sant' Anna 



ste programa, de grande utilidade pratica, transforma 
o seu CP-500 (ou qualquer outro micro compativel 

com o TRS-80 Model III) em uma verdadeira Mdqui- 

na do Tempo. Atravds dele e mediante o emprego de uma pe- 
quena interface, toma-se possivel ligar e desligar equipamentos 
eldtncos em tempos predeterminados, com altfssimo grau de 
confiabilidade, numa verdadeira integra 9 So do micro com o 

mundo exterior. . 

O segredo desta aplica^o consiste em utilizar dois recursos 
do micro muito pouco explorados, que sao o relogio mterno e a 
porta de comando do motor do gravador cassete (plugue crnza 

pequeno). , , . 

0 programa come 9 a por solicitar a hora atual, a hora de ati- 
vacao e a hora de desativa 9 ao do equipamento, todas no for- 
mate HHMM de 24 horas (exemplo: 1950, 2300, 0600 etc.). 

Em seguida, sao visualizados na tela tres retangulos (figura 
1), tendo o superior a hora atual (atualizada a cada minuto) e 



A M A 0 U I N 


A DO TEMPO 




=H0RA 


ATUAL= 


= 20:45 




= LIGAR EH = 


=DESLIGAR EM= 


= 22:00 


1 n 
1 
1 
1 

1 0 
1 tfl 
1 ■■ 

I j: 

II cn 
11 

11 

11 

II 1 ! 


FUNCAO 


DESATIVADA 



Figura 1-0 display do programa 



os infenores a hora de ativa 9 ao (esquerda) e desativa^ao (di- 
reita). Esta tela permanece durante todo o tempo de utiliza 9 ao 
do programa atd que seja apertada a tecla BREAK. Abaixo dos 
retangulos inferiors aparece uma mensagem que pisca com a 
frequencia de 0,5 Hz,e que serd FUNgAO DESATIVADA pa- 
ra tempos inferiores d hora de ativa 9 ao ou supenores a hora de 
desativa 9 So, ou FUNgAO ATIVADA, para os demais tempos. 

DESCRigAO DO PROGRAMA 

Embora simples em sua essentia, convent ressaltar os seguin- 
tes detalhes do programa: 

- Unhas 160-170 - Reserva de espa 90 string e defini 9 ao das 
strings mais utilizadas. Observe-se com aten 9 ao os espa 90 s con- 
tidos em TITS, BS, BBS, FS e LGS,que devem ser respeita- 
dos. 

- Linhas 180-240 - Entrada dos tempos e converse dos va- 
lores. 

- Linhas 250-340 - ImpressSo da tela. 

- Linha 350 - ImpressSo da hora atual na tela, atravds da 
sub-rotina das Unhas 540-560. 

- Unha 360 - Acionamento da mensagem piscante apropna- 
da, atravds da sub-rotina das Unhas 470-520. 

- Unha 370 — Teste de zero segundos (minuto “cheio”). Ca- 
so positivo, sSo feitas as compara^es necessdrias da hora atual 
com a hora de ativa 9 So ou desativa 9 So (linhas 390 ou 410), re- 
tomando a sub-rotina de atuaUza 9 So do tempo real em caso de 
nao-coincidentia. 

- Linha 400 - Ativa 92 o da porta que comanda o motor do 
gravador e do indicador de porta ativada (K= 1). 

- Linha 420 - Desativa 9 So da porta e do indicador (K= 0). 

- Unhas 430450 - La 90 fechado que permite, apos desati- 
vada a porta, manter a tela com a hora sempre atualizada e a 
mensagem FUNgAO DESATIVADA piscando. Observe-se que 
este d o fim do programa e, por ser um logo sem fim, s6 pode 
ser desfeito mediante o adonamento da tecla BREAK. 
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A descn^o do material d a segumte: 

J1 - Conector femea subminiatura, ao qual sera conectado o 
plugue cinza pequeno que vai ao re mo to do gravador. 

B1 - Bateria de 9V (ou o “eUminador” de batena da figura 3). 
£ importante ressaltar que no caso de utihza^o de batena, a 
confiabilidade de nossa Miquina do Tempo d fun 92 o direta do 
estado de carga da mesma. 

RL1 - Reid miniatura, que vai possibilitar a comuta 9 ao da car- 
ga desejada. A menos que o leitor pretenda acionar um apare- 
lho de ar condicionado, um aquecedor de agua ou um fogao 
eldtrico, serd sufiaente um re Id de bobina para 9 ou 1 2 V, en- 
rolamento de 500 a lOOOohms e contatos normalmente aber- 
tos para 1 10 V, 3 a 5 ampdres. 





FI 
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DC 




Cl 






& T1 









Figura 3 - Fonte de alimentagao simples, que pode ser usada em lugar 
da bateria de 9 V. Os pontos + e - devem ser ligados aos pontos respec- 
tivos da interface da figura 2. 



MATERIAL: 



FI - Fusivel 1A 
SI - Chave liga-desliga 

T1 - Transformador (primdrio - rede local; secunddrio - 6 V, 5 A) 

D1 - Diodo 1N4007 

Cl - Capacitor 2000Mf, 16 V 



Roberto Quito de Sent' Anna d Engenheiro de Telecomunicapdes, tra- 
balhando atualmente como Professor de Informdtica na Academia Mi- 
litar das Agulhas Negras e como Analista de Sistemas na Micro Maxi 
Computadores e Sistemas, ambas em Resende, RJ. 



100 '««*»*«»»*»«»««*»«»***««»««»»*»*«»»»»«* h »»*»*«m*»* 



110 '****** A MAQUINA DO TEMPO ****** 
120 '«*N«»«««»»M*«»««*»»»«K*««««»»M****»*«tt**«»«*«***» 
130 '* ROBERTO QUITO DE SANT' ANNA * 



140 ' *CAIXA POSTAL 24039 - CEP 20522 - R JANEIRO - RJ* 
150 '***********»**»*»******»»««IHH*»**tHM»##tH»»»*«#»H«»l» 
160 CLEAR 200: TIT*="A MAQUINA DO TEMPO" 
170 B* = " = " : BB* = " =" : F*="FUNCA0 ":LG*=" ATIVADA" 

:DLG*= "DESATIVADA” 

180 CLS: PR INT <? 16 , TIT* : PRINT 0 80 , STR ING* ( 32 , ) 

190 PRINT 8 197 , "ENTRE COM OS TEMPOS S0LICITADUS, TODO 
S NO F0RMAT0 HHMM" 

200 PRINT 0 321," INPUT "HORA ATUAL " ; HRS 
210 HH=INT (HRS/100) : MM=HRS-HH*100 :P0KE 16921 , MH : POKE 1 
6920, MM 

220 PRINT 0 513," ": INPUT "HORA DE ATI VACAO" ; L IGA 
230 PRINT t» 705," ":INPUT "HORA DE DESATI VACAO" ; DESL 
250 CLS:PRINT 0 16 , TIT* : PRINT 0 80 , STRING*( 32 , "-" > 

260 Z$~STRING*(13."="): PRINT 0 15M,Z$ 

270 PRINT 0 218, "=H0RA ATUAL=" SPRINT 0 282, Z* 

280 P=L IGA : GOSUB 5B0:LIGA*=P$ 

290 P=DESL: GOSUB 580 : DESL*>=P* 

300 PRINT 0 520, Z*: PRINT 0 556, Z* 

310 PRINT 8 584,"= LIGAR EM =": PRINT 0 620 , "=DESL.TGA 
R EM=" 

320 PRINT 0 648, Z*: PRINT 0 684, Z$ 

330 PRINT 0 712,B*+LIGA*+BB* rPRINT 0 748, B*+DESL*+BB* 
340 PRINT 0 776 , Z$ : PRINT 0 812,Z*:K=0 
350 GOSUB 540 
360 GOSUB 470 

370 IF VAL (R I GHT* ( TIME* , 2) )<>0 GOTO 360 

380 IF KOO GOTO 410 

390 IF HT *<>LIGA* GOTO 350 

400 OUT 236, 2:K=1 :GOTO 350 

410 IF HT*ODESL$ GOTO 350 

420 OUT 236 , 0: K=0 

430 GOSUB 470 

440 IF VAL(RIGH7*(TIME» ,2) )<>0 GOTO 430 
450 GOSUB 540: GOTO 430 

460 •****«SUBROTINA PARA MENSAGEM PISCANTE***** 

470 IF K=0 THEN MSG*=DLG$ : GOTO 490 
480 MSG*=LG* 

490 SEG=VAL (RIGHT** TIME*, 2) ) : REST=SEG-INT ( SEG/2 ) *2 
500 IF REST=0 PRINT 0 920, STRING*(17," ") .-RETURN 
510 PRINT 0 920 , F*+MSG* 

520 RETURN 

530 '*****SUBROTINA PARA IMPRESSAO TEMPO REAL***** 

540 HT*=MID* (TIME*, 10,5): ZZ*=B*+HT*+BB* 

550 PRINT 0 346, ZZ*: PRINT 0 410, Z* 

560 RETURN 

570 '»****SUBROTINA PARA HORAS ATIVACAO/DESATIVACAO 
580 IF P=0 THEN P*="00: 00" : RETURN 

590 IF P<10 THEN P* = "00: 0"+RI GHT* ( STR* ( P ), 1 ) -.RETURN 
600 IF P<100 THEN P*="00 : "+R IGHT* ( STR* ( p) , 2 ): RETURN 
610 IF P<1000 THEN R*=RIGHT* ( STR* ( P ) , 3 ) : P*="0"+LEFT* ( R 
*,l)+":"+RIGHT*(R*,2): RETURN 
620 R*=RIGHT*(STR*(P) , 4 ) : P*=LEFT*( R* , 2 ) +" : "+RIGHTS ( R$ , 

2 ) : RETURN ■ 

m 
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auirgos 



• A MICRO'S Processamento de Dados 
promove regularmente cursos de programagao 
BASIC e COBOL. Para o curso de BASIC sao 
utilizados dois microcomputadores Dismac e 
um NE-Z8000, com hor5rio individual para 
treinamento. As turmas sao compostas de, no 
m5ximo, 20 alunos e todo material did5tico 6 
fornecido pelo curso. Maiores informacoes na 
Rua Duque de Caxias, 450, Edif fcio . Chams, 
sis. 702 e 703, tel: (034) 235-6965, Uberlan- 
dia, MG. 

• A MICRO-KIT est5 promovendo regular- 
mente curso de BASIC para adultos e crian- 
cas, com turmas 5 tarde e a noite, e especiais 
aos s5bados, em v5rios hor5rios. Maiores infor- 
magoes na Rua Visconde de Piraj5, 303/210, 
Ipanema ou pelo tel: 267-8291 , RJ. 

• A Metodologla Warnler 5 o tema do curso 
que inaugurard os Semln5rios T5cnicos em In- 
form5tica - STI, da Servimec,dirigido a geren- 
tes de sistemas, anallstas de sistemas de um 
modo geral e programadores. Este curso Inau- 
gural ser5 proferido pelo prdprio Jean-Domi- 
nique Warnier (autoridade em lnform5tica da 
Franca) no Cesar Park Hotel, em Sao Paulo, 
de 28/11 a 02/12. Maiores detalhes pelo tel.: 
570-3818, SP. 

• A CompBel promove cursos de Introdugao 
aos Microcomputadores, para estudantes de 
nfvel colegial, 5s 2. as e 4? s feiras ou 5s 3. as e 
5? s feiras, no hor5rio de 14 :00h ou 16:30h, 
carga hor5ria de 20 horas. O curso de BASIC I 
e II 6 sempre 5s 2. as e 4. as feiras ou 3? s e 5? s 
feiras, 5s 1930h, 24 horas por mddulo 
(TK85, HP-85A e Apple II). O Visicalc-Plus 
com tragado de gr5ficos 5 5s 6 as e s5bados, 
com 12 horas/aula (HP85A e Apple II). Infor- 
magoes na Rua Gregdrio Paes de Almeida, 62, 
Vila Madalena, S5o Paulo, tel: (011) 65-9857, 
SP. 

• A Filcres est5 oferecendo cursos gratuitos 
sobre linguagem BASIC para os usu5rios de 
microcomputadores da linha Proldgica, com 
aulas pr5ticas e material did5tico gratuito. O 
setor de treinamento da Filcres est5 situado 
na Rua Aurora, 165, tels: (011) 220-5794 e 
222-3458, SP. 



• A Standard Data System Ltda. oferece re- 
gularmente cursos de BASIC e COBOL. Maio- 
res informagoes na Rua Pamplona, 818, 19 e 
29 andares, tels: (01 1 ) 285-5505 e 289-4941 . 
Sao Paulo, SP. 

• O NETC — Nucleo de Ensino de Tecnolo- 
gia e Ciencia est5 promovendo cursos de 
extensao universit5ria, aperfeigoamento, espe- 
cializagao, capacitagao e atualizagao profissio- 
nal. Sao eles: Software de Teleprocessamento 
(60h); Hardware de Teleprocessamento (45h); 
Computadores e Microcomputadores Digitais 
— Hardware (45h); Hardware MP 8080/85 
(35h); Eletr&nica Digital I - Combinacional 
(60h); Amplificadores Operacionais I (50h); 
Amplificadores Operacionais II (40h); Instru- 
mentagSo e Controle I (60h); Instrumentagao 
e Controle II (72h). Informagdes e inscrigdes 
na Rua Alvaro Alvim, 27, 29 and., Rio de 
Janeiro, RJ. 

• Apresentar os novos recursos e as facilida- 
des que os micros oferecem na 5rea de Estatfs- 
tica, com aplicagoes pr5ticas, sao os objetivos 
do Curso de Estatfstica Aplicada que a Divi- 
sao de Computadores e Sistemas do Brasil 
Trade Center estar5 promovendo no dia 19 de 
novembro. A taxa de inscrigao 6 de Cr$ 70 
mil. Informagoes pelos tels: (021) 259-1299, 
259-1499 e 259-1542 ou na Av. Epit5cio 
Pessoa, 280, Ipanema, RJ. 

• Introdugao a Sistemas 5 o curso que a 
Diacon lnform5tica est5 oferecendo aos em- 
pres5rios e profissionais liberais, com o objeti- 
vo de mostrar o funcionamento de um com- 
putador e seus componentes. Informagoes na 
Diacon, Rua Pedro de Toledo, 943, Vila Cle- 
mentino, tel: (011) 572-6168, Sao Paulo, SP. 

• A Ac5cia promove regularmente curso de 
BASIC e Aplicativos. Maiores informagoes 
na Av. Paulista, 2073, cj. 216, Edif fcio Horsa 
1 ou pelo tel : (01 1 ) 288-1 206, Sao Paulo, SP. 

• CLUCOMP - Centro de Computagao e 
Servigos est5 oferecendo curso de BASIC, 
COBOL, FORTRAN, Assembler, e ainda Ope- 
ragao e Digitagao. Todos estes com aulas teo- 
ricas e pr5ticas, turmas: manha, tarde e noite; 
e especiais aos s5bados e domingos. In fcio de 
novas turmas todo comego de mes. Maiores 
informagoes na Rua Bueno, 2239, Ipiranga, 
tel: (01 1 ) 21 5-5625, Sao Paulo, SP. 

• Introdugao aos Microcomputadores e 
Linguagem BASIC sao os dois cursos que o 
I BAM estar5 promovendo de 17/11 a 08/12 e 
de 14/11 a 14/12, respectivamente. Maiores 
informagoes no Largo do IBAM, n9 1 ou pelo 
tel: (021 ) 266-6622, Rio de Janeiro, RJ. 



• A Rio Micro Computadores e Sistemas 
est5 langando uma novidade no Rio de Janeiro: 
aulas de BASIC onde o professor 6 o compu- 
tador. Sao seis micros DGT-100 disponfveis 
no hor5rio diurno e o aluno faz seu prdprio 
hor5rio. O curso tern a duragao de uma sema- 
na, com cinco aulas de 2h30 min de duragao. 
A Rio Micro tambem oferece o curso de 
BASIC das 1900 5s 21 30h, com instrutor e 
seis micros DGT-100. Maiores informagoes na 
Rua Visconde de Piraj5, 330, Ij. 314, Ipane- 
ma, tel: 521 -4888, RJ. 

• A Compushop est5 oferecendo os cursos: 
"AA — 6 Aplicagoes Administrativas" e ”VA 
— 6 Visicalc Avangado". O primeiro apresenta 
conceitos fundamentais sobre a utilizagao de 
microcomputadores em tarefas administrati- 
vas, e ser5 realizado de 21 a 24 de novembro, 
de 2? a 5? feira, das 1800 5s 21 OOh. O se- 
gundo 5 um aprofundamento no uso do Visi- 
calc, Super Visicalc, Visiplot e Visitrend, e 
ser5 realizado nos dias 22 e 23 de novembro, 
3? e 4 a feira, das 8:30 5s 1 7O0h. Maiores in- 
formagoes na Rua Dr. M5rio Ferraz, 37, tel: 
(011) 210-0187, Sao Paulo, SP. 

SEMINARIOS 

• O IBAM — Instituto Brasileiro de Adminis- 
tragao Municipal estar5 promovendo os se- 
guintes semin5rios: Planejamento e Instalagao 
de I BM 4300, 17 a 18/11; Novos Conceitos de 
Organizagao de Arquivos, 23 a 25/1 1 ; Progra- 
magao de Sistemas de Tempo Real, 30/1 1 a 
2/12; Planejamento da lnform5tica na Empre- 
sa, 30/11 a 2/12; Projeto de Sistemas de Pro- 
cessamento Distribufdo, 7 a 9/12; Software 
para os Computadores Nacionais (An5lise 
Comparativa), 7 a 9/12. Todos estes semin5- 
rios ocorrer5o no Rio de Janeiro e terao como 
hor5rio: 8:30 5s 12. OOh e 13:30 5s 17 OOh. 
Maiores informagoes no Largo do IBAM, n9 1 
ou pelo tel: (021) 266-6622, Rio de Janeiro, 
RJ. 



• Para informar ao leitor sobre os cursos que 
est§o sendo oferecidos, a revista recolhe in- 
formagoes em dlversas institutes ou as rece- 
be pelo correio Portanto, n5o nos responsabi- 
lizamos por quaisquer alteragdes posterior- 
mente efetuadas por estas institutes nos 
programas ou pregos 



/;4 Computer World lanca o soft quevai transformer 
XjQ, seu micro da linha Apple* num eficiente centro de 

^ Gestao Contdbil l H 

A linha Annie merecia isto • Reduz o numero de langamentos pela metade. debitando e creditando valores 

■ ■ em suas respectivas contas, simuitaneamente, o que elimina qualquer erro no 

4 Computer World desenvolveu uma um plano de ate l500 contas . cora 200 «««* Padroes 

verdadeira “ Gestao C ontabll para (de 35 caracteres cada) que voce mesmo cadastra. e o equivalente a 1 .300 

„ . ,. , • nn-sumsic langamentos contabeis. 

sua empresa . Atinai, criar programas o linico que lhe permite fazer langamentos dia a dia, sem se preocupar com 

W/ccn nil dnnniln p simDles Droietar a dala - P° is no fim do m ^ s ele ,az dois J so r , RT ? : um P° r data P ara emiss ^° do 

aisso OU aaquuu e bimpies, ^rujpiu Diario. outro por conta para emissao do Razao. 

SOlllcb&S COmpadaS pficipntPS * Eniite Balancete de Verifica^ao. Balan^o Patrimonial e Posi^ao Geral do Plano 

* r ’ de Contas a qualquer momento. 

e Seguras, nao. Veja O que ela pode • E nao e so isso. Nosso sistema permite que voce crie o seu proprio 

° a Demonstrative de Resultados. onde voce escolhe quais as contas que entrarao 

fazer por voce: em sua composigao. 

• Ainda mais. com ele voce e totalmente auto suficiente. Voce inicializa seus 
disquettes, cria piano de contas e. principalmente. faz a contabilidade de 
quantas empresas quiser. 

‘Compativel com qualquer Computador da Linha Apple (Linitron AP II. Microengenho. Daemon, Apple II 
Plus Maxxi. etc I Configurafao minima CPU com 4ti Kb. 2 Drives. Impressora Paralela de 132 colunas 






\ Computer World 1 



Rua Bernardo Jose Sampaio, 138 
Campinas -SP - CEP 13100 
Tel. (0192) 32-4155 
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EGO = 8 X IBM PC 



Se voce analisar esse dado, sabera que EGO posso valer 8 vezes mais do que custo. 

EGO sou o unico que pode ter 8 terminals processando ao mesmo tempo. Sou MULTIUSUARIO. 
EGO sou o mais ecletico e o melhor microcomputador de 16 bits do mercado. EGO opero com os 
sistemas Analix, CP/M - 86 e MS DOS. EGO sou muito sociavel porque posso me comunicar com 
outros computadores, em varios protocolos: EGO, 4341, Ethernet etc. 

EGO falo varias linguas: Basic Compilado, Compilador “C”, Fortran, Assembler 8088, APL, 
Cobol, Basic Interpretado, Mumps, Pascal, Forth e ADA. 

EGO posso ertdereqar diretamente desde 128 Kbytes ate 1 Megabyte. Toda minha memoria 
e protegida por dispositivos de checagem de erros. EGO posso controlar ate 4 discos 

Winchester de 10 Megabytes cada. 

EGO ocupo pouco espaqo e EGO posso ser instalado em qualquer ambiente. 

EGO tenho um video de alta resolupao a cores, o que me da mais recursos 
em aplicagoes cientificas e ate mesmo nas comerciais. 

EGO ja citei muitas de minhas qualidades. Para que voce possa me conhecer melhor, me procure 
na SOFTEC. O pessoal de la pode prestar serv^os de suporte de software, treinamento 
e manutenpao, porque sao profissionais especializados que me apoiam. Afinal, assim como voce, 
usuario, EGO tenho o melhor apoio, sempre. EGO espero sua visita 1a na SOFTEC. Ate 1a. 



SOFTEC ENG. SISTEMAS COM. LTDA. 

Rua Camboriu. 255 CEP: 05058 
S3o Paulo-SP 
Telefone: 260 6800 










L6 vai uma boa oportunidade para voce testar sua perip4cia como artilheiro . 
Ah, e nao se esquepa de colocar seu a/vo dentro de uma "maga\"... 



0 alvo atras da montanha 

Rudolf o Horner Junior 



qui apresentamos um programa escrito em BASIC pa- 
ra microcomputadores compativeis com o Apple II 

Plus americano. Trata-se de um jogo bastante simples 

que utiliza grdficos de baixa resolu 9 ao. Existe um alvo fixo, 
atras de uma montanha, que devera ser atingido por tiros de 
canhao disparados pelo usuario. Este devera definir a velocida- 
de inicial de lan^amento do projetil e tambdm o angulo de in- 
clina^So do canhSo. 

Executado o programa, aparecerd na tela uma montanha 
marrom contra um fundo azul, tendo ao seu lado direito um 
retangulo negro que 6 o alvo a ser atingido. No principio do 
jogo, o usuario recebe 100 cargas de explosive. Cada carga po- 
de fomecer ao projetil impulso suficiente para que sua veloci- 
dade seja de um metro por segundo. Com o uso destas cargas, 
em sucessivos lan 9 amentos, o atirador deverd atingir seu alvo. 

Para cada disparo, o computador pedira que seja definida a 
quantidade de cargas a ser usada no lan 9 amento e o angulo de 
inclina 9 ao do canhao. Para confirmar o lan 9 amento, basta pres- 
sionar a tecla S. A trajetbria sera desenhada, e caso o tiro atinja 
a montanha ou saia dos limites do campo, serao emitidas men- 
sagens correspondentes. 0 jogo termina quando o alvo 6 atin- 
gido (o programa toca Parabens a Voce) ou entao quando o 
numero de cargas de explosivo acaba sem que se tenha alcan- 
9 ado o objetivo. 

Para elabora^o do programa, foram respeitadas as leis da 
mecanica Newtoniana, no que se refere a balistica: 



V seno (2.0) 
o 



T7 2 2 , _ * 
V seno (0) 
o 



onde, 

• A = alcance do projdtil ; 

• H = altura maxima atingida pelo projetil ; 

• V 0 = velocidade inicial de lan 9 amento; 

• 0 = angulo de inclina^o do canhao; 

• g = acelera 9 So gravitacional da Terra (g = 1 0 m/s 2 ). 
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IF <F- > 13 AND F < 19> OR <F > 
29 AND F < 34 > THEN PLOT F, 
18 

IF F > 5 AND F < 10 THEN PLOT 
F, 15 

IF F = 21 OR F = 26 THEN ULIN 



18 


, 16 


AT 


F 








IF 


F : 


= 22 


OR F = 


25 


THEN 


UL I N 


16 


, 17 


AT 


F 








IF 


F : 


= 


OR F = 


24 


THEN 


ULIN 


17 


, 18 


AT 


F 








NE 


XT 


: CO 


iLOR* 8: 


FOR 


: A = 


35 TO 


38 


: ULIN 


8,20 AT 


A: 


POKE 


6,7 



: POKE 7,18: CALL 768: NEXT 

UTAB 23: PRINT " M I C R 
0 S I S T E M A S": 

Q08UB 270: FOR F = 1 TO 250 
: NEXT : GOSUB 278 
HOME : COLOR* 7: FOR A = 1 TO 
38: HLIN 1,38 AT A: NEXT : COLOR* 
8: A = 12: F = 26': AL = 38 
HLIN A, F AT AL: AL = AL - 1:A 
= A + RND < 1 > : F = F - RND 
<1>: IF F - A > 1 THEN 150 
L = 29 + 7 * RND <1>: COLOR* 

0: HLIN L - 2,L + 2 AT 38: HLIN 
L. - 2, L + 2 AT 37: CA = 180 
IF NOT CCA > 0> THEN HOME 
: UTAB 23: PRINT TABC 5 > " UO 

CE PRECISA TREINAR MAI S 

" : FOR A = 12 TO 2 STEP - 1 
: POKE 6, A: POKE 7,128: CALL 
768: NEXT : TEXT : HOME : END 

UTAB 22: INPUT "DEFINA ANGUL 
O DE DISPARO: " ? A$ : AN * UAL 
< AT > : IF AN < 8 OR AN > 98 THEN 
178 

UTAB 22: PRINT "REST AM " 5 CA; 

" CARGAS DE EXPLOSIUO ! ! ! " : INPU* 
"DEFINA UELOC I DADE DE D I SPAR 
0: " 5 AT". U8 = UAL <A*>: IF U 

8 < 8 OR CA < U8 THEN 190 
HOME : UTAB 21: PRINT "ANGUL 
0 : "SAN I" GRAUS": PRINT 

" UELOC I DADE : " S U8 S " METROS^S 
EG UN DO" : PRINT = PRINT "DISP 
ARAR <S/N>? GET A* = IF A 

t- = "N" THEN HOME : GOTO 17 
0 

UTAB 23: PRINT SPCC 68 >: UTAB 
1 : CA = CA - U0: F = 0:X = 1:V 
= 38: POKE 6,255: POKE 7,10 
0: CALL 768: A = AN * .817452 

IF V > 36 AND X > L - 2 AND 
X < L + 2 THEN HOME : UTAB 
22s PRINT TABC 7>"P A R 
A B E N S ! ! .' " : GOSUB 2 
78: FOR T = 8 TO 1580: NEXT 
: TEXT = HOME : END 
IF X > 39 OR V > 39 OR V < 8 
THEN HOME : UTAB 23: PRINT 
TABC 8 > "ESTE TIRO UOCE PERD 
EU!!!": POKE 6,255: POKE 7,2 
55: CALL 768: CALL 768: CALL 



INPUT 



768: HOME : GOTO 178 
IF ’ SCRN C X,V> = 8 THEN HOME 
: UTAB 23: PRINT TABC 5>"T0 
ME CU I DADO COM A MONTANHA! ! ! 

": POKE 6,255: POKE 7,255: CALL 
768: CALL 768: CALL 768: HOME 
: GOTO 178 

COLOR* 0: PLOT X,V: POKE 6,1 
: POKE 7,10: CALL 768: COLOR* 

7: PLOT X,V 

F = F+ . 2 : X = X + 1 : V = 38 - 
F * U0 * SIN C A > + 4 * F 
2: GOTO 228 

PuKE 6, 1 it! 3 : POKE 7, 100: CALL 
768: POKE 7,188: CALL 768: POKE 
6,110: POKE 7,108: CALL 768: 

POKE 6,123: POKE 7,100: CALL 
768: POKE 6,92: POKE 7,180: CALL 
768: POKE 6,97: POKE 7,188: CALL 
768: RETURN 



Rudolfo Horner JCrnior curse CHnde de ComputagSo na Unicamp e 4 
sdcio da Potencial Software, firma que produz programas especiais 
para microcomputadores em Campinas, SP. 




Monk Langa 

Sistema Gerador de Programas 



A Monk, a dois anos vem produzindo software para mi- 
cros, langa uma inovagao para o mercado nacional, trata-se 
do sistema"DATAMANAGER" que 4 um gerenciador de ban- 
co de dados (SGBD).* Usavel como gerador de programas apli- 
cativos, e criado para ser utilizado por pessoas nao iniciadas 
em computagao. O usudrio nfo precisa conhecer a linguagem 
Basic ou Sistema Operacional, precisara apenas analisar seu 
problema e organizar uma solugao pr4tica, com o manual do 
programa, que 6 super completo, gerar seus programas apli- 
cativos. 

Exemplos de 4reas que j4 estao utilizando o sistema "DA- 
TAMANAGER" — com grandes resultados: — Controle e ges- 
tlo de estoque, Contas a pagar e receber, Controle e adm. de 
vendas, Folha de pagamento, Controle de pedidos e fatura- 
mentos. Mala direta, Criagao e manutengao de cadastros e 
bancos de dados, Adm. de clfnicas mtfdicas, dent^rias e escri- 
t6rios de advogacia, imobiliSria (adm. de contratos, imbveis, 
condom fnios) e em construtoras (controle de custos de obras), 
Fazenda Agropecu£ria. 

Os programas podem interfacear com outros programas 
em Basic, arquivos do VisiCalc e SuperScripsit. Este super 
programa roda nos micros CP 500, NAJA e TRS-80 III, com 
48K — 2 disk-drives e uma impressora opcional se preferir 
obter listagens impressas. 

Demonstragoes e maiores detalhes nos 66 revendedores** 
Monk por todo pais, ou diretamente d Monk, Rua E. 

’ Este programa foi testado na revista Micro Mundo do m6s de Agosto. n? 6 
* * Relacao dos revendedores na revista Micro Sistemas do m3s de Agosto, n° 23. 

monk micro informbtica ltda. 

R. Augusta. 2690 - 2° And.- L. 318 e 324 - 

Tels.: 280-0163 e 852-2958 - SP 
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Entre no ritmo sabendo seu atual estado fisico, emocional e intelectual com 
este programa em duas versdes: uma para o TK82-C e outra para o DG T- 100 



Biorritmo no micro 

Francisco Luiz Farias Bezerra 



entre os diversos ritmos da vida, este programa esco- 
lhe, para tra?ar as curvas, os mais importantes: FfSI- 
CO, de 23 dias; EMOCIONAL, de 28 dias ; INTELEC- 
TUAL, de 33 dias. Cada ritmo atravessa duas fases distintas: 
POSITIVA — quando a curva estd acima do seu eixo central; e 
NEGATIVA — quando a curva se encontra abaixo do mesmo 
eixo. As fases invertem-se na metade de cada ciclo. Os dois ini- 
ciais, tanto da fase positiva como da fase negativa, sao conside- 
rados crfticos. 

Desenvolvido em linguagem BASIC, este programa esta 
apresentado em duas versOes: uma para o TK82-C e outra para o 
DGT-100. Entretanto, pode ser rodado em outros micros, des- 
de que sejam efetuadas as devidas modificafSes, possibilitan- 
do atd o seu emprego pelos que n5o disp<5em de expansao de 
memoria. 

Vejamos agora como o programa opera. Carregue-o e exe- 
cute GOTO 1; deverd aparecer no video a seguinte configura- 
ble) : 



PARA O CALCULO DO BIORRITMO 
TECLE SUA DATA DE NASCIMENTO 
DIA? 



Entao, o que for sendo solicitado deve ser acompanhado de 
NEW LINE. MES DO BIORRITMO? e ANO DO BIORRITMO? 
solicitam, respectivamente, o mes e o ano desejados para o cal- 
culo do biorritmo. Aguarde urn instante e aparecerao no video 
as curvas (senoides) de cada urn dos ciclos sequencialmente. 

Terminada a exibi 9 ao de um dos ciclos na tela, digite NEW 
LINE para obter o ciclo seguinte. Depois do ultimo ser exibi- 
do, teclando-se NEW LINE, o micro se reprograma solicitando 
outro MES/ANO BIOR? para novos calculos, sem necessidade 
da introdu$£o, novamente, da data de nascimento. 



Francisco Luiz Farias Bezerra 4 Engenheiro Eletricista da Fundaqao Nu- 
cleo de Tecnologia Industrial — NUTEC, com sede em Fortaleza, e esta 
atualmente prestando servigos na cidade de Crato, no Ceard. Ele tern 
como hobby a elaboraqao de programas, tanto de uso geral como espe- 
ci'fico, em Matemdtica e Eletricidade, 4 radioamador e possui uma 
calculadora HP-41 CV, um TK82-C e um CP-500. 







Biorritmo no TK 




1 


REM AUTOR: LUIZ BEZERRA | 




5 


FAST 






10 


PRINT 


TAB 7;"B I O R R I T 


M 


O" 








15 


PRINT 


AT 4,0; "PARA O CALCUL 


O 


DO 


BIORRITMO" , "TECLE SUA DATA 


1 DE NASCIMENTO . " 




20 


PRINT 


, , "DIA? "; 




25 


INPUT 


D 




30 


PRINT 


D,,,,"MES? "; 




35 


INPUT 


M 




40 


PRINT 


M, ,, , "ANO? "; 




45 


INPUT 


A 




50 


PRINT 


A 




55 


GOSUB 


270 




60 


LET L= 


=N 




65 


LET D= 


=1 




70 


PRINT 


, , , , "MES- DO BIORRITMO 


? 


» . 
/ 
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75 INPUT M 

80 PRINT M, , , "ANO DO BIORRITMO 

? " 

85 INPUT A 
90 CLS 

95 GOSUB- 270 
100 LET DS=N-L 

105 LET X=23 

110 LET A$ = " CTWHIH " 

115 GOSUB 155 
120 LET X=28 
125 LET A$= 

130 GOSUB 155 
135 LET X=33 
140 LET A$=" 

145 GOSUB 155 
150 GOTO 65 

155 PRINT "BIOR. " " ";A$;" " " D 
E : " ; M; "/"A 
160 FOR K=0 TO 63 
165 IF K> 39 OR K<1 THEN GOTO 17 
5 

170 PLOT 0,K 
175 PLOT K , 20 
180 NEXT K 

185 LET F=DS- ( INT (DS/X))*X 
190 LET JD=0 



lEMOClONALi 



intelectual! 



195 

B: " ; 
200 
205 
210 
215 
220 
225 
230 
235 
240 
245 
250 
255 
260 
265 
270 
275 
280 
285 
290 
295 
300 

30.6 

305 

310 

315 



PRINT AT 21,2; 



DIAS CRIT1CO 



FOR K=2 TO 63 

LET LS=SIN ( (F*2/X) *PI ) 

PLOT K , 20+18 *LS 

IF LS<>0 THEN GOTO 230 

PRINT AT 21 , 16+JD ; INT (K/2) 

LET JD=JD+3 

LET F=F+ . 5 

NEXT K 

FOR K=5 TO 30 STEP 5 
PRINT AT 12,K;K 
NEXT K 
PAUSE 4E4 
CLS 

RETURN 

IF M< 3 THEN GOTO 290 

LET MM=M+1 

LET AA=A 

GOTO 300 

LET MM=M+13 

LET AA=A-1 

LET N=INT ( 365 . 25*AA) +INT ( 
*MM) +D-621049 
RETURN 

SAVE "BIORRITMO" 

RUN 



Biorritmo no DGT-100 



1 CLS:PRINT" B I 0 R R I T M 0" :PR INT : PR INT" Dentre os diversos 

ciclos da vida .este programa esco -lhe para tracar as curvas os mais importante 
s r itmos:":pRINT"FISICO de 23 DIAS, EMOCIONAL de 28 dias"; 

2 PR INT" , INTELECTUAL de 33 d i as." :PR INT"Apos o termino da exibicao de um dos cic 
los na tela tecle gual -guer tecla para obter o ciclo segu i nt e ,"sPRINT"Depo i s do 

ultimo ser exibldo o programa solicita outro MES/ANO sem necessidade de inseri 
r novamente a "; 

3 PRINT"sua data de nasc i ment o. ":PR INT" E entao, maos a obr a , ver i f i gue com 

o esta para voce este mes e BOA SORTE H ! H " :F0RQ=0T02000: AS="" : Al=INKEYi : IFA4> 
< ""THEN4 ELSE NEXT 9 

4 CLS : CLEAR 300 :PRINTCHRS( 23 ) 

5 'PRG. BIORRITMO / AUTOR: LUIZ BEZERRA 

6 D%=STR I NG% ( 64 : PR INTD1 

8 PRINT" B I 0 R R I T M 0" :PR INT : PR INTO* 

10 PR INT"P ARA CALCULO DO BIORRITMO : ":PRINT 

20 PR INT"TECLE SUA DATA DE NASCIMENTO :" s INPUT" < D i a , Mes , Ano ) : " ; D , M , A 
30 G0SUB224:L=N:D=1 

40 PR INTCHR 5 ( 23 ) : INPUT"MES , ANO DO B IORR ITMO" ; M , A 

SO G0SUB224:DS=N-L:CLS 

60 X=23: A5= "FISICO ": GOSUB 90 

70 X=2B:A5="E MOCIONAL ":G0SUB90 

BO X=33:A4="I NTELECTUAL ":G0SUB90 

90 PRINT" BIORRITMO ";AS ; " DE: ";M;"/";A 

100 FOR K=0T0127 

110 IF K >44 OR K < 4THENG0TO13O 

120 SET<0,K):SET<1,K> 

130 SET(K ,24) :NEXTK 

140 F=DS-< INT <DS/X> >»X: JD=0 

145 PI=3. 14159265358 

148 PR INT396Q , "D IAS C R I T I C 0 S 
150 F0RK=4T0127 

160 LS=SIN( (F*2/X)»PI ) :SET ( K , 24-20«LS ) 

170 IF LS< >0THEN200 

180 PRINTS! 988+ JD ) , INT < K/4 ) ; : JD= JD+6 

200 F=F+0.25:NEXTK 

210 FORK =5 TO 30 STEP 5 

220 PR INT3510+2**K , K ; : NEXTK 

222 XS="":Xl=INKEY$: IFX5=""THEN222 

223 CLS: IFX=33THEN40:RETURN 

224 IF M< 3 THEN G0T0240 

225 MB=M+1 : AB=A 
235 G0T0250 

240 MB=M+ 13 : AB=A-1 

250 N=INT < 365 . 25«AB ) + INT < 30 . 6»MB ) +D-621049 
260 RETURN 
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Peixes, Libra, Gemeos, nao importa o signo. Entre com 
o programa que a HP "sai" com o horoscopo 



HP-41CV e o horoscopo do dia 

Joao Lucio Duarte 



ue tal bancar o Astr61ogo com seus amigos? Pegue 
M sua HP-41 CV SIZE 086 e rode estes dois programas. 
Vy Depois, lance a data da consulta (dd,mm) seguida da 
data de amversdno da pessoa (tambem dd,mm). Pronto: a cal- 
culadora ird consul tar os astros e revelar como estd a saude, o 
amor, numero e cor de sorte, aldm de calcular o signo de seu 
cliente (as instrugoes de operagao estao na figura 1). 

Adicionalmente, voce podera comandar algumas mensagens 
especiais. Sao elas: SEU TELEFONE (cddigo 5); ACHO VOC£ 
UM AMOR (codigo 6Y, VOCE ESTA PRECISANDO CAS AR- 
SE (codigo 7) e VOCE ESTA CHATO DEMAIS (cddigo 8). Pa- 
ra aciond-las basta, no modo USER, pressionar a tecla £ +,es- 
tando no visor o(s) codigo(s) da mensagem escolhida. No caso 



do cddigo 5, digite o numero do telefone de seu cliente e este 
numero ficara a disposigao no registrador 79 para futuras 
“consultas.” 

Aproveite tambem para mostrar sua cnatividade ampliando 
o banco de informagoes - registradores 01 a 78 (figura 2) — , 
ou ainda cnando outros e deixando-os disponiveis em cartoes 
magneticos. 



Joao Lucio Duarte d formado em Administrafao de Empresas e estu- 
dante de Logosofia.Trabalha na Area de Recursos Humanos, onde utiliza 
sua HP-41 CV. 



PASS0S 


instruqOes 


DADOS 


TECLA 


VISOR 


01 


Carregue os programas "H0R" e 

"REG" 


- 


- 


- 


n 


Preencha os registradores 01 
a 78 , execu tando programa "REG" 


Va r i a ve 1 1 
Va r i a ve 1 2 


xeq"reg" 

R/S 

R/S 


REG NR 1 
REG NR 2 

REG NR 3 


n 


Inicie 0 programa (em USER) ou 
comande (E+) para mensagens 


CODIGO 


XEQ"H0R" ou 
Z + 


dia.mEs H0JE 
dia.mEs hoje 




Indique data de consulta 
(ex. 20 ABR = 20, 04) 


dd ,mm 


R/S 


aniversArio? 


n 


Informe data ani versario 

(ex. 5 MAI = 5,05) 


d d , mm 


R/S 


( 1 NFORMAQdES) 


■ 


Repetir passos 3,4 e 5 para 
obter mensagens especiais. 
Nao querendo usa-las, basta 
repetir 0 passo n? 5, pos i - 
cionado a u toma t i camen te . 









Figura 1 - Instrugoes 



78 
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0 1 




BOA 


40 




STATUS 


02 


- 


OT 1 MA 


41 


- 


PRAZO 


03 


- 


CAC0 


42 


- 


Oc 10 


04 


- 


RU IM 


43 


- 


AVISO 


LA 

0 


- 


FRACA 


44 


- 


vOo 


06 


- 


FORTE 


45 


- 


SUAR 


07 


- 


DE AQO 


46 


- 


PENSAR 


08 


- 


fTgado 


47 


- 


CRIAR 


09 


- 


f rs 1 co 


48 


- 


AJUDAR 


1 0 


- 


VISUAL 


49 


- 


F0LGAR 


1 1 


- 


R 1 TM0 


50 


- 


ACATAR 


1 2 


- 


v r c 1 0 


51 


- 


FERI AS 


13 


- 


REG 1 ME 


52 


- 


MUDAR 


14 


- 


FRIO 


53 


- 


P I0RAR 


15 


- 


CAL0R 


54 


- 


MAL 


16 


- 


BEB 1 DA 


55 


- 


BEM 


17 


- 


VENT0 


56 


- 


DURAR 


18 


- 


GELAD0 


57 


- 


F 1 XAR 


19 


- 


FARRA 


58 


- 


DANAR 


20 


- 


AQUCAR 


59 


- 


SALVAR 


21 


- 


JO IA 


60 


- 


BRANCO 


22 


- 


CALM0 


61 


- 


PRET0 


23 


- 


ESPERE 


62 


- 


AZUL 


24 


- 


FOSSA 


63 


- 


VERDE 


25 


- 


BR 1 GAS 


64 


- 


ROSA 


26 


- 


LUTE 


65 


- 


MARR0N 


27 


- 


JU IZ0 


66 


- 


C 1 NZ A 


28 


- 


V0LTAR 


67 


- 


BEGE 


29 


- 


FUGI R 


68 


- 


R0X0 


30 


- 


PENAR 


69 


- 


CREME 


31 


- 


SABER 


70 


- 


VIAGEM 


32 


- 


SUM 1 R 


71 


- 


NEGRO 


33 


- 


GELAR 


72 


- 


C0NTAS 


34 


- 


GAMAR 


73 


- 


AZAR 


35 


- 


CHEFE 


74 


- 


ALrvio 


36 


- 


C0LEGA 


75 


- 


PERI GO 


37 


- 


ATRAS0 


76 


- 


CHANGE 


38 


- 


PAP0 


77 


- 


FEU Z 


39 




CARGO 


78 




DRAMAS 



Figura 2 - Tabela de registradores 
do banco de in formagdes 



Listagem 1: Horoscopo 



001 lbl t hob 

002 CF 29 

003 FIX 0 

004 T HOROSCOPO 

005 XEQ 15 

006 T CIENTIFICO 

007 XEQ 15 

008 Individual 



062 1 **TRABALHO** 

063 XEQ 15 

064 T CUIDADO COM O 

065 35 

066 STO 84 

067 10 

068 XEQ 16 

069 PSE 



123 STO 79 

124 T OBRIGADO 

125 XEQ 15 

126 GTO T ABC 

127 LBL T CB 

128 T ACH0 VOCE 

129 XEQ 15 

130 T UM AMOR 



Listagem 2: Programa “REG” 



184 GTO 00 

185 LBL 04 

186 T ARIES 

187 20 

188 GTO 00 

189 LBL 05 

190 T TOURO 

191 20 



XEQ 15 


070 


t voce precisa 


131 


XEQ 15 

T 


192 


GTO 00 


T DIA,MES 'HOJE 


071 


45 


132 


GTO ABC 


193 


LBL 06 


PROMPT 


072 


STO 84 


133 


LBL T DC 


194 


T G£MEOS 


STO 81 


073 


7 


134 


T VOCE ESTA 


195 


20 


lbl t DIA 


074 


XEQ 16 


135 


XEQ 15 


196 


GTO 00 


t aniversario 7 


075 


PSE 


136 


t precisando CASA 


197 


LBL 07 


PROMPT 


076 


t numero sorte 


137 1- R-SE 


198 


t cancer 


T * SEU SIGNO * 


077 


XEQ 15 


138 


XEQ 15 


199 


21 


AVIEW 


078 


100 


139 


GTO T ABC 


200 


GTO 00 


STO 80 


079 


STO 83 


140 


lbl t PD 


201 


LBL 08 
T 


FRC 


080 


xeq t rndm 


141 


T VOCE ESTA CHATO 


202 


1 LEAO 


EEX 2 


081 


VIEW 81 


142 H DEMAIS 


203 


22 


X 


082 


PSE 


143 


XEQ 15 


204 


GTO 00 


STO 00 


083 


PSE 


144 


GTO T ABC 


205 


LBL 09 
T 


RCL 80 


084 


t **sua COR** 


145 


LBL T RNDM 


206 


VIRGEM 


INT 


085 


XEO 15 


146 


RCL 82 


207 


22 


EEX 2 


086 


60 


147 


9821 


208 


GTO 00 








148 


X 


209 


LBL 10 




087 


STO 84 








T 


ST ♦ 00 


088 


10 


149 


.211327 


210 


‘libra 


RCL 80 


089 


XEQ 16 


150 


+ 


211 


22 


RCL 81 


090 


PSE 


151 


FRC 


212 


GTO 00 


X 


091 


T — LAR •*• 


152 


STO 82 


213 


LBL 11 

T 


STO 82 


092 


XEQ 15 


153 


RCL 83 


214 


‘ESCORPIAO 


XEQ IND 00 


093 


t vai 


154 


X 


215 


21 


T ** SAUDE •• 


094 


52 


155 


INT 


216 


GTO 00 


XEQ 15 


095 


STO 84 


156 


STO 81 


217 


LBL 12 
T 












218 


SAGITARIO 


1 


096 


8 


157 


RTN 


219 


22 


STO 84 


097 


XEO 16 


158 


LBL 15 


220 


RCL 80 


7 


098 


PSE 

T 


159 


AVIEW 


221 


INT 


XEQ 16 


099 


*• FUTURO ** 


160 


PSE 


222 


X < V 7 


T CUIDE DO 


100 


XEQ 15 


161 


CLA 


223 


GTO 13 


8 


101 


70 


162 


RTN 


224 


3 


STO 84 


102 


STO 84 


163 


LBL 16 


225 


ST - 80 


6 


103 


9 


164 


STO 63 


226 


GTO 01 


XEQ 16 


104 


XEQ 16 


165 


xeq t rndm 


227 


LBL 00 


T EVITE 


105 


PSE 

T 


166 


STO 81 


228 


RCL 80 


14 


106 


UM BOM DIA 


167 


RCL 84 


229 


INT 


STO 84 


107 


XEQ 15 
T 


168 


+ 


230 


X « Y 7 


7 


108 


GOSTOU ? 


169 


STO 85 


231 


GTO 13 


XEQ 16 


109 


XEQ 15 
T 


170 


A RCL IND 85 


232 


1 


PSE 


110 


LBL' ABC 


171 


AVIEW 


233 


ST + 00 


T »** AMOR ••• 


111 


FS7C 08 
T 


172 


RTN 


234 


0 


XEQ 15 


112 


GTO PD 


173 


LBL 01 


235 


STO 80 


21 


113 


FS7C 06 
T 


174 


t capricornio 


236 


GTO IND 00 


STO 84 


114 


GTO CB 


175 


20 


237 


RTN 


7 


115 


FS2C 07 
T 


176 


GTO 00 


238 


LBL 13 


XEO 16 


116 


GTO DC 


177 


LBL 02 


239 


AVIEW 


T 0 BEM VAI 


117 


FS?C 05 


178 


t aquario 


240 


PSE 


28 


118 


gto t jj 

T 


179 


19 


241 


PSE 


STO 84 


119 


GTO DIA 


180 


GTO 00 


242 


RTN 


7 


120 


lbl t JJ 


181 


LBL 03 


243 


LBL A 


XEQ 16 


121 


t seu TELEFONE 


182 


T PEIXES 


244 


SF IND X 


PSE 


122 


PROMPT 


183 


20 


245 


gto t hor 



01 


- LBL REG 


04 


- STO 0 0 


07 


- ARC L 00 


10 


- AST0 IND 00 


13 


02 


- FIX 0 


05 


- LBL A 


08 


- AON 


1 1 


- ISG 00 


1 4 


03 


- 1,078 


06 


- t reg NR 


09 


- PROMPT 


12 


- GTO A 


15 



13 " ACAB0U 

14 - AV I EW 
1 5 - END 
































Aqui vao a/guns truques de protecao de programas, especialmente para os 
usuariosdo TRS-80 e compatfveis. Nao os deixe escapar\ 



O program a invisivel 

Newton Braga Junior 



omo ja foi dito, nao existe sis- 
tema de protegao de programas 

total me nte infalivel, mas a co- 

pia ou a altera^ffo podem ser dificulta- 
das com o uso de certos comandos. Um 
exemplo pode ser o ATTRIB, que pode 
protege r um programa contra a copia ou 
listagem. Vejamos: ATTRIB nome: d 
(a,ACC= b, UPD= c, PROT= x), onde: 

• nome — Nome do programa. 

• d — Numero do drive onde se encon- 
tra o disquete com o programa. 

• b - Senha de acesso ao programa. Se 
nao for especificada logo apos o nome 
do programa, quando no seu carrega- 
mento ou execu9ao. o programa nSo se- 
ra acessado ou executado. 

• c — Senha de proteijao. Esta senha 
esta muito ligada a condi^ao de prote- 
9ao PROT. Somente mencionando-se es- 
ta senha e que pode ser alterado o 
PROT. Ela nao aparece no diretorio do 
disquete. 

• PROT — Cond^ao de prote9ao do 
disquete, podendo ser: EXEC — somen- 
te para execu9ao; READ - leitura (car- 
regamento e execu9ao); WRITE — lei- 
tura, execu9ao e grava9§o; FULL — pro- 
te9ao 0 (zero). 0 programa esta total- 
mente acessivel. 

• a — Condi9ao de visibilidade do dire- 
tono do disquete. 

No sistema TRSDOS ou DOS 500 , o 
formato do ATTRIB 6 exatamente igual 
ao que apresentamos no micio do arti- 
go. No NEWDOS ou DIGDOS, sao duas 
as altera9oes: em primeiro lugar, no lu- 
gar das , (virgulas) usam-se parenteses; 

80 



em segundo lugar, a condi9ao a no 
TRSDOS e I para invisivel e N para nffo 
invisivel, e no NEWDOS £ INV para in- 
visivel e VIS para visivel. 

Vamos ver no exemplo: ATTRIB 
TESTE/BAS : 0 , INV,ACC= MICRO ,UPD 
= COMPUTADOR, PROT= EXEC. 0 
programa TESTE/BAS no drive 0 tera o 
seu nome invisivel no diretdrio do 
disquete. Para ser acessado, e preciso sa- 
ber a senha de acesso MICRO (por 
exemplo, RUN TESTE/BAS.MICRO), 
e para ser mudada a condi9ao de prote- 
9ao, a senha COMPUTADOR tern que 
ser mencionada. 

Se voce esquecer a senha de acesso 
ou de condi9ao de prote^o, ACC e 
UPD, respectivamente, nao tern proble- 
ma... Use o utilitario SUPERZAP do 
NEWDOS ou DIGDOS para ter acesso 
ao disco e mudar diretamente na posi- 
930 em que as senhas sao guardadas. 

A senha-mestre do disquete esta po- 
sicionadq diretamente em cima do no- 
me do disquete, em seu lugar proprio de 
armazenamento no diretorio do disque- 
te. Mais precisamente, na linha acima, 
nos ultimos dois bytes. A condi9ao de 
visibilidade e' armazenada no primeiro 
byte da linha onde aparece o nome do 
programa. Ja na linha inferior ao nome 
do programa, voce vai encontrar, nos 
dois pnmeiros bytes, a senha ACC, e, 
nos proximos dois bytes, a senha UPD. 

As senhas sao codificadas em hexade- 
cimal, o que nao se toma um problema 
se voce utilizar a op9ao DPWE do 
SUPERZAP, que e codificar uma pala- 
vra. em hexadecimal, usando dois bytes. 



No TRSDOS, o diretdrio se encontra 
na trilha 17 . A senha-mestre do disque- 
te, no setor 1 ; e as senhas ACC, UPD e 
visibilidade, a partir da trilha 1 7 , setor 3 . 

No NEWDOS, voce tern que usar a 
fungao DFS do SUPERZAP, que tern 
como fungSb receber o nome do arquivo 
ou programa que se deseja acessar, e ain- 
da procurar onde se encontra armazena- 
do o programa para ser apresentado. 

Se for usado o comando AUTO no 
disquete, o programa sera imediatamen- 
te carregado e executado sempre que. for 
dado um RESET na maquina. Mas se vo- 
ce ficar pressionando a tecla RETURN 
ou ENTER ao ser dado o RESET, o 
AUTO perde a fungao momentaneamen- 
te, e com isso voce tern acesso ao siste- 
ma. 0 NEWDOS ou DGDOS possui uma 
caracteristica muito interessante: a tecla 
RETURN ou ENTER pode ser cancela- 
da momentaneamente sempre que for 
executado o RESET. Para isso, voce tern 
que usar o comando SYSTEM e alterar 
os parametros AB e BD. 

No exemplo SYSTEM password: 
drive ,AB= Y,BD= N, a tecla RETURN 
ou ENTER sera cancelada apenas en- 
quanto o RESET estiver acionado, apos 
o que a tecla volta a sua condi^o nor- 
mal de opera9ao. 

m 



Newton Braga Junior 4 programador COBOL, 
FORTRAN e , BASIC. Atualmente & Gerente 
de Sistemas da loja Rio Micro Computadores 
Ltda., RJ. 
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. '‘Boor c 

24linhas 
pontos • 1 



Sistema 



Quem e bom ja nasce feito. 



O Micro Engenho 2 e o computador 
profissional, de uso pessoal, mais completo do 
Brasil. 

E essa virtude ja vem de bergo, porque o Micro 
Engenho 2 e construido em tres mbdulos 
destacaveis: o visor, a unidade de processamento 
eoteclado. 



Isso facilita a sua colocagao nas mais 
diversas posigoes. 

E o Micro Engenho 2 e totalmente compativel 
com dois respeitadissimos profissionais 
americanos:o Apple* II Plus eo Apple* lie. 

Junte-se aos bons. 

Profissional com profissional se entende. 












■S5 2 JmSculas, acentoa . A coluna s x ■ 









SOD 



PASCAL 



Apple He 

>14 



192k bytes •Controls or — 

rpstoro verde. . 



IPsforoverde. Micro Engenbo2. 

: vanta^ 



Micro Engenho 2. 
O profissional 
para uso pessoal. 












& 
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.<$ £ ft r c 
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EQUIPAMEIMTOS ELETRAnICOS HMD. E COM. LTDA. 
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Admiravei publico, iremos apresentar agora um numero especial 
de magia para os micros da linha Sinclair 



Sete truques magicos 

Antonio Faieiro 



com estes programas simples, 
mas de grande magia, voce e 
seu micro serao os astros da 
festa. Os truques sao, na verdade, uma 
divertida brmcadeira, mas irao surtir 
um grande efeito. 

Digite cada um deles, experimente os 
resultados, arquive-os e entao reuna os 
amigos ou aguarde aquela festinha em 
famflia para apresenta-los com habilida- 
de e ate um certo toque de mist^rio. 

Os programas estao ai, o show fica 
por sua conta... 



As cartas na mao 



10 REM AS CARTAS NA MAO - A. FA 
LEIRO - NIG 

20 CLS 

30 PRINT TAB 4;"*** AS CARTAS 
NA MAO ***" 

40 PRINT , , "TOME UM BARALHO E 
DIVIDA-0 EM TRES MONTES COM UM 
A TERCA PARTE DE CARTAS EM CADA 
UM. " 

50 PAUSE 4E4 

60 PRINT , , , , "ESCOLHA UM DOS M 
ONTES E CONTE SUAS CARTAS. DEP 
OIS COLOQUE-O NAMAO ESQUERDA." 

70 PAUSE 4E4 

80 PRINT ,', , , "SOME OS DIGITOS 
DA CONTAGEM DAS CARTAS E RETIRE, 
DO MONTE QUE ESTA NA MAO ESQU 
ERDA, UM NUMERO DE CARTAS IGUAL 
A ESSA SOMA E DEIXE-AS DE LADO 

90 PAUSE 4E4 



100 PRINT , , , , "QUANTAS CARTAS V 
OCE AINDA DESEJARETIRAR DA MAO E 
SQUERDA? DIGITE ENTAO ESSA QUANT 
I DADE . " 

110 INPUT A 
120 CLS 

130 PRINT AT 5,0; "NA SUA MAO SO 
BROU (SOBRARAM) " , , , , 9-A; " CARTAS 



Abracadabra 



10 REM ABRACADABRA - A. FALEIRO 
- NIG 

20 CLS 

30 PRINT "*** ABRACADA 
BRA *** 

40 PRINT , , , , "PEGUE O BARALHO 
E FAC A 3 MONTES COM 7 CARTAS EM 
CADA UM, DE FACES PARA BAIXO." 

50 PAUSE 4E4 

60 PRINT , , , , "NUM DOS 3 MONTES 
, OLHE E MEMO- RIZE UMA CARTA, 
SEM DESARRANJAR A ORDEM DO MESMO 

70 PAUSE 4E4 

80 PRINT , , , , "TOME ESSE MONTE 
E COLOQUE-O EM CIMA DE UM DOS O 
UTROS DOIS . O MONTE QUE REST 

OU COLOQUE EM CIMA DE AMBOS . " 

90 PAUSE 4E4 

100 PRINT , , , , "ORDENE AS CARTAS 
DO MONTE, UMA AUMA, ALTERN ADAME 
NTE , FORMANDO 3 NOVOS MONTES . " 
110 PAUSE 4E4 
120 CLS 

130 PRINT "PROCURE O MONTE NO Q 
UAL SE EN- CONTRA A CARTA ESCOL 
HIDA, SEM PREJUDICAR A ORDEM D 
AS CARTAS. COLOQUE ESTE MONTE P 
OR CIMA DE UM DOS OUTROS DOIS E 
O QUE RES- TOU POR CIMA DE AMBO 
S. " 

140 PAUSE 4E4 

150 PRINT , , , , "REPITA O PROCESS 



O DE ORDENACAO DAS CARTAS EM TR 
ES NOVOS MONTES. VERIFIQUE EM QUA 
L MONTE ESTA A CARTA ESCOLHIDA 
E O COLOQUE POR CIMA DE UM DOS O 
UTROS DOIS E O RESTANTE POR CIM 
A DE AMBOS . " 

160 PAUSE 4E4 

170 CLS 

180 PRINT "AGORA VOU IMPRIMIR, 
LETRA POR LETRA, A PALAVRA MAG 
ICA" , , , "A B R A C A D A B R A" , , 
, "A CADA LETRA QUE SURGIR VOCE D 
E-VERA RETIRAR UMA CARTA DE CIMA 
DO MONTE E A DEIXAR DE LADO." 

190 PAUSE 300 

200 LET A$="A BRACADABR 

A" 

210 PRINT AT 15,0; 

220 FOR A=1 TO 21 STEP 2 

230 PRINT TAB A,A$(A); 

240 PAUSE 100 

250 NEXT A 

260 PRINT , , , , , "VOCE TEM NAS MA 
OS A CARTA QUE MEMORIZOU . . . " 

270 STOP 

Adivinhe a idade 
e o numero do sapato 



10 REM NUMERO DO SAPATO E I DAD 
E - A. FALEIRO - NIG 

20 CLS 

30 PRINT "ADIVINHACAO: NUMERO 
DO SAPATO E IDADE . " 

40 PRINT ,,,,,, "MULTIPLIQUE O 
NUMERO DO SAPATO QUE CALCA POR 
DOIS. " 

50 PAUSE 4E4 

60 PRINT , , , , "SOME CINCO AO TO 
TAL ENCONTRADO . " 

70 PAUSE 4E4 

80 PRINT ,,,, "MULTIPLIQUE POR 
CINQUENTA ESSE TOTAL." 
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90 PAUSE 4E4 

100 PRINT , , , , "SUBTRAIA DO TOTA 
L ENCONTRADO O ANO EM QUE VOCE 
NASCEU. " 

110 PAUSE 4E4 

120 PRINT ,,,, "DIGITE O RESULTA 
DO. " 

130 INPUT A 
140 CLS 

150 LET A=A+1733 

160 PRINT AT 5,0; "NUMERO DO SEU 

SAPATO = " ; INT (A/100) 

170 PRINT AT 10,0; "SUA IDADE = 

" ; A- ( INT (A/100) ) *100;" ANOS" 

180 PAUSE 4E4 
190 RUN 



Conta to com o UFO 



10 REM O CONTATO - A. FALEIRO - 
NIG 
20 CLS 

30 PRINT " *** CONTATO COM O 

UFO ***" 

40 PRINT , , , , "DIGITE O NOME DE 
6 PESSOAS . " , , , "SOMENTE UMA DELA 
S FARA CONTATO COM O UFO." 

50 DIM A$ ( 6 , 15 ) 

60 FOR N=1 TO 6 
70 INPUT A$ (N) 

80 PRINT ,,A$(N) 

90 NEXT N 
100 CLS 

110 PRINT AT 16,0;" 



120 FOR X=2 TO 16 
13 0 PRINT AT 6 , X ; " E H3" ; TAB X-2 
;" BBB" ;TAB X-l;" — " 

140 PAUSE 50 

150 NEXT X 

160 FOR M=9 TO 15 

170 PRINT AT M, 17 ; " '""" 

180 PAUSE 30 
190 NEXT M 

200 PRINT AT 13,17; "SOH" ; TAB 18 
; "■" ; TAB 17; "SB H" 

210 LET A=INT (RND*6)+1 
220 PRINT AT 17,17;A$(A) 

230 PRINT AT 21, 0 ; "<ENTER> PARA 
OUTRO CONTATO." 

240 PAUSE 4E4 
250 GOTO 100 



Adivinhe o numero 



10 REM NUMERO DE 3 ALGARISMOS 
- A. FALEIRO - NIG 

20 CLS 

30 PRINT "ADIVINHACAO: NUMERO 
DE TRES ALGARIS 

MOS " 

40 PRINT ,,,,,, "ESCREVA UM NUM 
ERO DE TRES ALGARISMOS." 

50 PAUSE 4E4 

60 PRINT ,,,,"INVERTA ESSE NUM 
ERO. " 

70 PAUSE 4E4 

80 PRINT ,,,, "SUBTRAIA O MENOR 

DO MAIOR. " 

90 PAUSE 4E4 

100 PRINT , , , , "DIGITE O ULTIMO 
ALGARISMO DO RESULTADO DA SUB 
TRACAO . " 

110 INPUT A 

120 PRINT ,,,,,,"0 TOTAL DA SUB 
TRACAO E: "; 

130 IF A=0 THEN PRINT "000" 

140 PRINT 9 -A ; " 9 " ; A 

150 PAUSE 4E4 

60 RUN 



Adivinhe as cartas 



10 REM O PAR DE CARTAS ESCOLHI 
DAS - A. FALEIRO - NIG 

20 CLS 

30 PRINT "ADIVINHACAO: O PAR D 
E CARTAS ESCOLHI 

DAS. " 

40 PRINT ,,,, "COLOQUE AS CARTA 
S DO BARALHO, COMAS FACES PARA Cl 
MA, EM 4 FILAS NA SEGUINTE ORDE 
M: " 

50 PRINT ,,"1 FILA - DAMA DE O 
UROS , AS DE PAUS , 3 DE COPAS,AS 
DE ESP AD AS, 9 DE PAUS." 

60 PRINT , , "2 FILA - ' 7 DE COPA 
S , 6 DE PAUS, 7 DE OUROS , 2 DE ESPA 
DAS, 3 DE OUROS" 

70 PRINT , , "3 FILA - REI DE OU 
ROS , 5 DE ESPA-DAS REI DE COP AS , 6 
DE ESPADAS DAMA DE COP AS . " 

80 PRINT , , " 4 FILA - VALETE DE 
OUROS, 5 DE PAUS VALETE DE COP 
AS, 2 DE PAUS 9 DE ESPADAS" 

90 PAUSE 4E4 
100 CLS 

110 PRINT "ESCOLHA UM PAR (DUAS 
CARTAS COM O MESMO VALOR) ." 

120 PAUSE 4E4 

130 PRINT ,,,, "DIGITE JUNTOS OS 
NUMEROS DAS FILAS ONDE SE AC 
HAM AS CARTAS DOPAR QUE VOCE ESC 
OLHEU, EM ORDEM CRESCENTE . " 

140 INPUT B 

150 PRINT , , , , "O PAR QUE VOCE E 
SCOLHEU E:", , , , 

160 PRINT ("DAMAS" AND B=13)+(" 
ASES" AND B=ll) + ( "TRES" AND B=12 
) + ( "NOVE" AND B=14 ) + ( "SETE " AND 
B=22) +( "SEIS" AND B=23) + ( "REIS" 
AND B=33) + ( "VALETES" AND B=44)+( 
"CINCO" AND B=34) + ( "DOIS" AND B= 
24) 

170 PAUSE 4E4 
180 RUN 



Soma Magica 



10 REM SOMA MAGICA - A. FALEIRO 
- NIG 

20 CLS 

30 PRINT TAB 6;"*** SOMA MAGIC 
A ***" 

40 PRINT ,,,, "ESCREVA UM NUMER 
O QUALQUER." 

50 PAUSE 4E4 

60 PRINT , , , , "SOME A ESSE NUME 
RO O QUE LHE SEGUE (EX: SE ES 
COLHEU 13 SOME COM 14)." 

70 PAUSE 4E4 

80 PRINT , , , , "SOME NOVE AO RES 
ULTADO. " 

90 PAUSE 4E4 

100 PRINT , , , , "DIVIDA O TOTAL P 
OR DOIS." 

110 PAUSE 4E4 

120 PRINT ,,,, "SUBTRAIA O PRIME 
IRO NUMERO QUE VOCE ESCOLHEU DO 
RESULTADO DADO PELA DIVISAO." 
130 PAUSE 4E4 
140 CLS 

150 PRINT "ESCOLHA UM NUMERO QU 
ALQUER E SOME-O AO TOTAL ENCO 
NTRADO . EM SEGUIDA DIGITE O NUM 
ERO QUE VOCEESCOLHEU E LHE DARE I 
O TOTAL QUEVOCE ENCONTROU." 

160 INPUT A 

170 PRINT AT 10,6;" > " ;A+5 

180 PAUSE 4E4 _ 

190 RUN ^ 
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Se voce tern pequenas 
rotinas e programas 
utilitarios realmente 
uteis tomando poeira 
em seus disquetes ou 
fitas cassetes, antecipe-se 
aos piratas e trate de 
divulga-los. Envie-os para 
a REDAQAODA MICRO 
SISTEMAS — SEC AO DICAS: 

Rua Visconde Silva, n° 25, 

Botafogo, RIO DE JANEIRO-RJ, 
CEP 22281. 

Nao se esqueca de dizer 
para qual equipamento 
for am desenvolvidos. 

Desta forma , sua descoberta 
podera ser util para muitos 
e muitos, em vez de 
desmagnetizar-se com o 
tempo em suas fitas 
e disquetes... 



Faija, com esta dica, a instru 9 ao NEXT operar como 
urn contador simples, economizando muitos bytes, e tor- 
nando a listagem indecifrdvel para os “curiosos”. 0 pro- 
cesso e simples (mas muita aten 9 §o nas linhas 320 a 
350): quando o limite do loop e atingido, NEXT I conti- 
nua contando os valores mas nao retorna ao micio do 
loop. Neste exemplo, apos I = 9, NEXT I passa a corres- 
ponder a LET I =1+1. 

100 FOR Y=15 TO 25 STEP 10 

110 FOR X=15 TO 37 

1'20 PLOT X,Y 

130 NEXT X 

140 NEXT Y 

200 FOR X=15 TO 37 STEP 22 

210 FOR Y=15 TO 25 

220 PLOT X, Y 

230 NEXT Y 

240 NEXT X 

320 FOR 1=0 TO 9 

330 PRINT AT 11,11;! 

340 NEXT I 

350 GOTO 330 




Linha TRS 



Pisca-pisca 



A mensagem contida em AS 
sera impressa centrada na ultima 
linha da tela, fazendo urn inte- 
ressante efeito visual do tipo 
“letreiro luminoso”, e com a 
vantagem de nao deslocar o 
cursor de sua posiijao corrente. 
Use esta dica como sub-rotina, 
tendo AS como argumento de 
entrada que pode vanar a cada 
chamada: 



5000 CLS iDEFINT A-Z 

5010 A$="APERTE QUALQUER TECLA PARA CONTINUAR" 
5020 DEFFNX (A$ ,1) =ASC (MID$ (A$ ,1,1) ) 

5030 N=LEN(A$) : INI=16320+ (64-N) /2 :Nl= (N-l) 

5040 FOR 1=0 TO Nl/2:POKE INI+Nl-I , FNX (A$ ,N-I ) 

5050 POKE INI+I , FNX ( A$ , 1+1) :NEXT 

5060 FOR 1=1 TO 200:NEXT 

5070 IF INKEY$ < > " " GOTO 5120 

5080 FOR 1=0 TO Nl/2:POKE INI+Nl-I,32 

5090 POKE INI+I, 32 :NEXT 

5100 FOR 1=1 TO 200 :NEXT 

5110 IF INKEY$=" " GOTO 5030 

5120 END 



Roberto Quito de Sant' Anna — RJ 



Linha SINCLAIR 



Linha SINCLAIR 



Inicializando variaveis 

Esse pequeno programa demonstra a inicializagao de 
20 varidveis (de A a T), dentro de um loop, cada uma 
recebendo um passo do mesmo. Isso pode ser feito em 
qualquer parte do programa, com qualquer varidvel, e 
com qualquer valor. A unica restr^ao 6 conhecer a posi- 
9 S 0 (endere 9 o) da varidvel dentro do programa e entSo 
fazer um POKE nesse local com o cddigo da nova varid- 
vel. 

Digite, rode, e teste esse programa com PRINT A, 
PRINT B, PRINT C, PRINT D etc... 

10 FOR Z=1 TO 20 
20 LET A=Z 
30 POKE 16538, Z+38 
40 NEXT Z 



An dr 6 Alves Jardim — GO 



Compactacao de programas 

Quando estamos escrevendo um programa 6 muito 
comum termos um INPUT e, logo ap 6 s, uma serie de 
desvios condicionais, como por exemplo: 



. . . INPUT U$ 

. . . IF U$="aaaa" THEN GOTO 

... IF U$="bbbbbbb" THEN GOTO 

. . . IF U$="ccc" THEN GOTO 

. . . IF U$="dd" THEN GOTO 



Mas isso pode ser reduzido, substituindo-se por: 
INPUT U$ 

LET X= *(U$ = "aaaa") + 

* (U$="bbbbbb" ) + * (U$="ccc") +. 

.. .*(U$="dd") 

IF X THEN GOTO X 



Renato Degiovani — RJ 



Alinhe os numeros 



Marcelo Silva Santos — SP 



Para alinhar, pela direita, a impressao de numeros, em 
vez de usar... PRINT A, use: 

. . . PRINT TAB 31 - LEN STRS A; A 
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Veja como, de maneira bem simples , voce pode evitar desligar a fonte de a/imentagao 
quando quiser desligar sua UCP. Mas cuidado com sua RAM... 



Reset: desligando 
a UCP do micro 



Manuel Maria C. P. de Caste/lo 



eset 6 um pequeno macete que nos permite desligar a 
UCP - sem ser preciso desligar todo o micro - sem- 
pre que precisamos refazer um programa inteiro ou 
apagar qualquer coisa no video. £ bom lembrar, no entanto, 
que todo cuidado 6 pouco, pois ao ser pressionado o Reset, 
tudo o que estiver armazenado na memdria RAM serd perdido. 
No nosso caso, repito, s6 6 usado para evitar o desligamento 
da fonte de alimenta^o sempre que se queira recomefar um 
programa. 

Para colocar o Reset no micro basta por o pino 26 para Ne- 
gativo Terra, utilizando uma chave para ON/OFF Reset (chave 
de campainha). A figura 1 mostra como esta modifica^o deve 
ser feita (e o melhor 6 que voce pode adaptar o Reset em qual- 
quer microcomputador). 



Manuel Maria Costa Pinto de Caste I to tem diversos cursos nas Areas de 
Eletrdnica Digital, M icroprocessadores e Linguagens de Programagao. 
Manuel A portuguAs de nascimento, estando radicado no Brasil desde 
1975, e tem como hobby montagens eletrdnicas relacionadas com 
Audio, con tr ole e computagSo. 




CAMPUSWARE 

O maior e melhor catelogo em livros de computacao! 
Aqui, uma selecao especial para voc£. 




COMO LIDAR COM O COMPUTADOR 

Henry C. Lucas Jr. 

1983- 160 pp. 

Informal bate-papo com o leitor que responde 
as perguntas feitas pelo pessoal leigo envolvido 
no processamento de informapdes. Os conselhos 
e sugestdes abordam situagoes retiradas de am- 
bientes comerciais do dia-a-dia, e cobrem tanto 
os procedimentos bisicos de operapao, quanto 
as aplicapoes criativas dos microcomputadores. 




BASIC PARA MICROS PESSOAIS 

Jorge da Cunha Pereira Filho 
1983 - 232 pp. 

Importante apresentagao da Linguagem Basic, 
de forma extremamente didatica. Cada capitulo 
traz um guia de estudo dirigido e muitos exer- 
cicios, fornecendo ao leitor as informapdes para 
a perfeita utilizagao em microcomputadores 
pessoais, bem como os de teclado piano. 




IMPLANTACAO DE MICROS E 
MINICOMPUTADORES COMERCIAIS 

P. A. Knight 
1983- f20 pp. 

Urn guia seguro para os responsdveis pela insta- 
lapao de sistemas de computapao, este livro ser- 
viri de ajuda nos aspectos mais diffceis e fun- 
cionard como uma Lista de Verificapao para 
que nada seja esquecido. 




MICROCOMPUTADORES PARA 
APLICAQOES COMERCIAIS 

W. Barden Jr. 

1983 - 260 pp. 

Conhega um microcomputador e suas aplicapoes 
comerciais antes de se decidir por sua escolna e 
aquisipao: componentes dos sistemas comerciais 
de pequeno porte, perigos a evitar, vocabul&rio 
especializado e at6 mesmo um pequeno curso 
de linguagem basic. 




FUNDAMENTOS DE 
PROCESSAMENTO DE DADOS 

Wilson T. Price 
1983 - 200 pp. 

Uma introdugao concentrada e condensada ao 
processamento de dados que procure reduzir a 
quantidade de informapdes a respeito, preser- 
vando apenas os conceitos mais importantes e 
os itens basicos mais significativos. 




GUIA DE LINGUAGENS 
DE COMPUTADORES 

Harry L. Helms Jr. 

1983- 122 pp. 

Se voce precisa ou quer saber as diferenpas en- 
tre COBOL, FORTRAN e outras linguagens, es- 
te livro e para voce. Cada caoitulo apresenta 
uma conhecida linguagem de programap9o; o ul- 
timo cont6m um dicionario de palavras-chave. 



TfTULOS E PREQOS 

1 • COMO LIDAR COM O COMPUTADOR 

CrS 4.030,00 

2 • BASIC PARA MICROS PESSOAIS 

CrS 6.240,00 

3 • implantaqAo de micros e 

MINICOMPUTADORES 

COMERCIAIS 

CrS 5.390,00 

4 • MICROCOMPUTADORES PARA 
aplicaqOes COMERCIAIS 

CrS 7.440,00 

5 • FUNDAMENTOS DE 

PROCESSAMENTO DE DADOS 

CrS 6.210,00 

6 • GUIA DE LINGUAGENS DE 
COMPUTADORES 

CrS 4.210,00 



CAMPUSWARE 

FA£A AQUI SEU PEDIDO 

Assinale abaixo o(s) numero(s) correspondente(s) 9(s) publicapao(oes) que deseja receber: 



E 


E 


0 


0 


E 


0 



Assinale a sua oppao de compra: 

O Cheque nominal A ATI-Editora Ltda. N? Banco 

Atengao: Neste caso, fapa o cheque com 10% de desconto sobre os prepos mencionados e 
deixe o porte por nossa conta. 

OReembolso Postal 

Envie o seu cupom ainda hoje para: 

ATI-Editora Ltda. 

Rua Visconde Silva, 25 

22281 Botafogo — Rio de Janeiro — RJ 

Nome 

Endereqo 

CEP Cidade Estado 



Atenpao: Pregos va lidos por tempo limitado 












EQUIPAMENTOS SOFTWARE 



• Vendo CP-200 em 6timo esta- 
do devido ao pouquissimo uso, 
por apenas Cr$ 165 mil. Tratar 
com Jo§o das 12:00 ds 13:00h 
pelo tel: (011) 5704046. 

• Vendo Micro NE-Z8000 com 
expansSo de 16 K em estado de 
novo, por Cr$ 100 mil. Tratar 
com Ricardo, Av. R. G. do Sul, 
544, Divindpolis, MG, CEP 35500, 
Cx. Postal 158. 

• Vendo Modem Conencisa 
MPC 12, na embalagem. Tel.: 71 1- 
3072, Cristina, Niterbi, RJ. 

• Vendo uma HP-25, cientffica, 
programdvel, com dtima conserva- 
<pao. Tratar em hordrio comercial 
com Mauro, tel.: 24-3566/R : 299, 
Porto Alegre, Rio Grande do Sul. 

• Vendo um TK82-C com ex- 
pansSo de 16 K de RAM, acompa- 
nhado de v^rios jogos, entre eles: 
Defensores, Monstro das Trevas, 
Simulador de Vdo, etc. Tern sels 
meses de uso e acompanha ma- 
nual e caixa original. O pre$o 6 de 
Cr$ 100 mil. Tratar com Sdrgio 
Lufs da Silva, na Av. Conselheiro 
Nubias, 710, Santos, SP ou pelo 
tel.: (0132) 35-1125, em horiSrio 
comercial. 

• Vende-se um microcomputa- 
dor Apple II Plus de 48 Kbytes, 
linguagem Apple Soft BASIC, 
equipado com cartao de lingua- 
gem BASIC de 16 K. Um monitor 
marca Sanyo, mod. VM4509, uma 
impressora Apple Silentype, um 
Disk Drive Apple, todos os ma- 
nuals do fabricante, jogos, joys- 
tik e programas para Inlciantes. 
Tratar pelos tels: 221-5755 e 
221-2039 ou pela C. Postal 266, 
Recife, PE. 

• Vendo um acelerador de hard- 
ware para CP-500 ou TRS-80 Mo- 
delo III, com tela antiglare. Tra- 
tar com Rorian pelo tel: (011) 
240-7244, Sao Paulo. 

• Vendo uma impressora EPSON 
X-80 com F/T. Tratar com Ro- 
berto, a noite: (021) 239-1865, 
Rio. 

• Compro TK 82-C, com expan- 
s£o de 16 K. Tratar com Osvaldo 
pelos tels: (0192) 31-1873 (duran- 
te o dia) e (0192) 31-9099 (a noi- 
te), Campinas, SP. 

• Vendo um TK 82-C, com ex- 
pansSo, joystick, gravador manual, 
mais de 50 programas, livros, re- 
vistas, catSlogos de cabos. Tudo 
por CrS 150 mil. Tratar com Re- 
nato ou Maurfcio pelo tel: (011) 
543-0095, SSo Paulo, SP. 

• Vendo um TK 82-C, com ex- 
pansSo e varios incrementos pelo 
pretjo de Cr$ 100 mil. Oferepo 
fitas como brinde. Tratar com 
Mauricio pelo tel : (01 1 ) 493-3322. 



• Vendo ou troco os programas 
para TK, NE e CP, em ffta: TK- 
Man, Krazy Kong (versao do Don- 
key Kong, com trfis estSgios) e 
outros. Escrevam para Gilberto 
Gaigalas, Rua Guaxinduva, 707, 
Santo AndrS, SP, CEP 09000. 

• Troco ou compro programas 
relacionados com Medlcina. Car- 
los Mauricio Giesbrecht Weinstein. 
Cx. Postal 14.532, Sao Paulo, SP, 
CEP 03698, tel: 21 7-0241. 

• Compro programas para o 
TK82-C, principalmente jogos, se- 
jam em flta ou em livro. Os inte- 
ressados devem enciar relatpao dos 
programas disponfveis para Ro- 
berto Gibello, Rua Cel. Jovinia- 
no BrandSo, 459, Mobca, SSo 
Paulo, SP, CEP 03127. 

• Desejo trocar programas de jo- 
gos versSo 2 K com usuSrfos do 
TK/NE/Sinclalr. Tratar com 
Adriana Sampalo, Jardim Sul Bra- 
sil, 110, Bairro Trindade, CEP 
88000, Florianbpolls, SC. 

• Vendo jogos para Apple ou 
compatfveis. Tratar com Francis- 
co pelo tel: (011) 832-5131, Sao 
Paulo. 

DIVERSOS 

• Compro o numero seis da re- 
vista MICRO SISTEMAS, desde 
que em bom estado. Pago tr§s ve- 
zes o prego da banca. Cartas para 
Pedro S. Nicolletti. UFPB/CCT/ 
DSC Cx. Postal 0030-58.100, 
Campina Grande, PB. 

• Vendo os seguintes livros, por 
metade do prego de capa, em db- 
lares oficiais: Computer Technics 
Hand Book - Ward TAB U$ 18; 
6801 — Hardware Reference Ma- 
nual — Motorola U$ 24; e Micro- 
processor Interfacing — TAB U$ 
17. Fornego xerox do esquema do 
Apple II; TRS-80 I; Interface para 
48 K; Interface para Floppy disk 
(linha TRS-80); Interface tipo 
Centronics; Interface controlado- 
ra de disquetes para linha 6502 
da Rockwell (AIM-65); esquema 
do AIM 65; Rockwell. Despesas 
postais inclufdas. Tratar com En- 
rique Ferri. Rua Fiagao da Saude, 
128/103, CEP 04144, Sao Paulo, 
tel: (011) 2474400, r. 335. 

• Troco numeros de fevereiro e 
margo da Revista Byte, pelos nu- 
meros de abril e maio deste ano, 
em bom estado. Os exemplares de 
que disponho est§o em excelente 
estado. Tratar com Francisco Au- 
gusto, Cx. Postal 523, CEP 66000, 
Bel^m, PA. 

• Vendo os exemplares da revis- 
ta MICRO SISTEMAS do n? 1 ao 
n? 25, por Cr$ 16 mil. Oferego 
um exemplar da revista Byte co- 
mo brinde. Erwin Eulner, tel: 
(011) 543-5971. 



• Gostaria de entrar em contato 
com possuidores de equipamentos 
compatfveis com o CP-500, para 
troca de informagoes, programas e 
jogos. Tratar com Alexandre 
Farias, Av. Conselheiro Aguiar, 
3645/602, Recife-PE, CEP 50000. 

• Procuro pessoas interessadas 
em fundar um Clube do Sinclair 
aqui em Salvador. Isidoro. Cartas 
para Rua Joao das Botas, 4, apto. 
802, Salvador, BA; ou telefone 
para: 235-0721. 

• Possuo um CP-300 e gostaria 
de comunicar-me com usubrios de 
micros compatfveis para intercam- 
bio de informagoes e programas 
em Assembler ou BASIC. Adilson 
Soneghett Santos, Rua JoSo da 
Cruz, 400, Praia do Canto, Vi- 
tbria, ES. 

• Gostaria de entrar em contato 
com possuidores de TK's, para 
troca de id^ias e programas na 
3rea m&Jica. Luiz Alberto Loss, 
Rua Julio de Castilhos, s/n9 , 
Nova Roma, Antonio Prado, RS. 

• Sou possuidor de um Texas 
TI994A e de um TRS-80 Color 
Computer e estou interessado em 
trocar informagoes, idbais, progra- 
mas, fitas cassete, livros e revistas 
com possuidores destes micros. 
Cartas para Paulo Roberto Ceot- 
to, Rua Cyro Lopes Pereira, 922, 
apto. 304, Ed. Duque de Alba, 
Jardim da Penha, CEP 29000, 
Vitbria, ES. 



• Gostaria de formar uma elite 
de pessoas que ten ham o Kaipro 
II para trocar software e informa- 
goes. Escreva para James Phillips 
na Av. Mai. Camara, 160, edf. Or- 
ly, 1826, RJ, tel.: 240-9628. 

• Procuro possuidores de JR 
Sysdata para obter contatos e for- 
mar um clube. Fomego esquemas 
do TRS-80 Modelo I e Apple II 
Plus. Escrevam para Enrique Her- 
nandez Ferri. Rua FiagSo da Sau- 
de, 1 28/103, Sao Paulo, SP. 

• Disponho de um DGT-100 e 
gostaria de entrar em contato com 
pessoas que se interessem em tro- 
car Id6ias, expertenclas e progra- 
mas de jogos e utilit^rios compatf- 
veis com esse micro. Tenho varia- 
dos programas em BASIC e em 
linguagem de m^quina. Tratar 
com Ivone T. Dutra, Rua Paulo 
Gomes, 653, Curitiba, Parang. 

• Desejo entrar em contato com 
pessoas que possuam um DGT- 
100 para troca de ktelas e progra- 
mas em BASIC e em linguagem de 
m^quina. Escrever para J. F. da 
Silva, Rua Gal. Osbrlo, 1031, si. 
106, CEP 13100, Campinas, SP, 
tel.: (0192) 86537. 

• Gostaria de entrar em contato 
com usudrios do TK, NE, CP e ZX 
para troca de programas (aplicati- 
vos e jogos) e Informagbes. Ro- 
berto Liles Machado, Rua Santa 
Cruz, 936, Pelotas, RS, CEP 
96100. 



Na materia Um programs para radioamadores, 
MS n9 22, Julho/83, pdgina 64, devem ser feitas 
as seguintes corregoes no programa: 

• linha 132: substituir por 132 INPUT ER$ 

• incluir a linha 134: 134 IF ER$="ER" THEN 
CLS:GOTO 43 

• corrigir a linha 140 para: 140 IF LEFTS 
(ER$,1)="N" THEN GOTO 8000 

Na materia Resta 1 — Desafio no PC1211, MS 

24, setembro/83, p^gina 32, segao Conversao, 

substituir as linhas 60 e 150 do programa por : 

60:R=INT N-INT A: IF R =0 THEN 500 

150 :IF R =0THEN 510 
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H BITS E BITIS 

COMPUTADORES 

• VEND AS 

• ASS. TECNICA 
ESPECIAL IZADA 

• PROGRAMAS 

• DISKETTES 

• FITAS 

• SERVICOS 

• CURSOS DE BASIC 

• FORMULARIOS 



EM SAO CONRADO 
Estrada da G4vea, 642 
Lj. B Tel.: 322-1960 




PRO JED AT A 

PROJETOS E SISTEMAS EM PROCESS AMENTO DE DADOS LTDA. 



SOFTWARE DISPONIVEL P/TRS-80 
MOD. II SHUMEC; POLYMAX 
E MICROS NACIONAIS C/ CP/M: 

Contabiiidade c/Centro de Imobiliaria, Condominio, 



Custo, Folha de Paga- 
mento, Controle de Esto- 
que, Controle de Bouti- 
que, Mala Direta, Gmv 
trole Bancario, Mercado 
Financeiro, Fluxo de Cai- 
xa, Administragao Finan- 
ceira, Contas a Pagar/ 
Receber, Administragao 



Estatistica de Vendas, Vi- 
sicalc. Banco de Dados. 

SERVigOS 
DE BUREAUX: 

Contabiiidade, Folha de 
Pagamento, Controle de 
Boutique, Estatistica de 
Vendas, Condominio. 



Rua Barao de Mesquita, 7 12- A Andarai 
CEP 20540 — RJ — 258-7599/273-8387 



"venHaver 

P PAHA CREB 

Temos todos os 

Microcomputadores 

nacionais: 

CP200,300,500,TK85,APII Maxxi. 

Perifericos: Impressoras, Gra- 
vadores Suprimentos: Disket- 
tes, Fitas, Papel pi impresso- 
ras. Softs Especialicidos: Mi- 
-s cro Id6ia, Monk. Micro e Micro 
isoft 

1 Melhores pregos e 
* atendimento. 

< MICRO HOUSE 
Rua Visconde de PlraJA, 547 a/307 
Ipanema — Rio de Janeiro — RJ. 
Tela. 294-6248 a 239-3744. 



moc 1 

HOUSE 



“CONTABILIDADE 
E DIVERSOS” 

I VOL. Programas em lin- 
guagem “BASIC”, Aplica- 
§oes completamente nesolvi- 
das. TK-82 C, TK-85, NE 
Z8000, SINCLAIR Z X 81. 
Quantidades - TEL.: 2394264 
Varejo — Av. Afranio Melo 
Franco, 170 Lj. B. 

LEBLON 

BANCA JORNAL — Av. 
Ataulfo Paiva Esq. R. Carlos 
Goes — Leblon 
PRECO CrS 3.900,00 



Revendedor BRASC0M 
Microcomputador BR1000M: 

1 a 6 terminais MULTIUSUARI0 
De 2,4 a 384 Mb emdisco 
Impressoras de 100 CpS a 600 Lpm. 
SOFTWARE: Contabiiidade, 
Administragao de Pessoal, 

VENDA E RESERVA DE INGRESS0S 

Contas a receber/Pagar, 

OPEN MARKET, 

Faturamento e outros. 



MICROIDEIA 



SOFTWARE P/TK 82 C - TK-85 - CP 200 

C«lMt( Pr«go/ORTN 

— Controle de estoque 4 

— Contes a pagar/receber 3 

— Fluxo de CaTxa 4 

— Mala direta 4 

— Cadaslro da cllentes 4 

— Processador da laxlos 2 

— Controle bancario 2 

— Contabiiidade domestlca 2 

— Agenda telefdnlca 2 

— Fltoteca 2 

— Orgamento domestlco 2 

— Hlstograma Qeral 3 

— Controle da contratos 4 

— Reserve da contullas 8 

JOGOS A 1 ORTN 

— Allan Blaster - Bombardelo ■ Cassino - Orgio - All 
Baba/Cosmic Radar ■ Space Invaders 

SOFTWARE P/CP 500 
Em Disco 

— Controls da estoque • Process, de Taxto 

— Contas a Pagar/Receber - Cadaslro da Cllentes 

PROMOQAO PREQOS 
EM ORTN DE MAIO 



REPRESENTANTE: MICRO HOUSE 
Com. Raprent. Lida. • R. Vlsconda da Ptral*. 547 
s/307 ■ Ipanema - Cap. 22.410 • Tat. 294 6248 ou 
atravds da MICROIDEIA - Av. Maracbal Cimara. 



pelo BIP J89 - Central 246-4180 



(R55EL1 



Assistencia Eletrdnica Ltda. 



SSs-SS— " 



Rua da Lapa. 107 - 1.° and. 
Tels.: 222-7137 e 222-2278 
Rio - RJ. 



BIBUOTECA 

DEINFORMATICA 

B0LSA 

DE SOFTWARE 
BUREAU 
DE SERVIQ0S 

QUALIDADE E 
RESPONSABILIDADE 
A PREQOS 
REDUZID0S 



M Representante 
Credenciado 

dismoc (Micro Computadores) 
br flora COMERCIO E ASSESSORS 

Rua Conde de Bonfim, 344/406 
Bl. 1 • Tijuca ■ RJ - Cep 20520 - 
Tel.: (021) 234-3945 - C.P. 2411 7. 



f No Recife, visite N 

T E L E V i D E 0 (') 

0 Lojao de Inform^tica mais des- 
complicado do pais! 

Micros, perifdricos. suprimentos. 
Software. Cursos, Livros e Revistas. 
Componentes eletronicos. pegas e 
Som. 

PREQOS ESPECIAIS. 
FINANCIAMENTO PROPRIQ 
Compre pessoalmente ou pelo 
Reembolso: 

TELEVIDEO LTDA. 

R. Marques de Herval, 157 
Tel.: (081) 224-8932, 
RECIFE, PE. 

O Sr. Industrial: distribuimos s/ 
produto nas melhores condi- 
Qdes: contatos em S. Paulo (011) 

[ 223-5480. 



CT) MICRQtQV.TE 

SISTEMAS E COUiPAMENTOS 
MMMMM C0MPUTACI0N4IS LTDA 

— HARDWARE 

• Perif6ricos para 
Linha Sinclair 
TK-82C, TK-85 
NEZ8000 e CP-200 

—SOFTWARE 

• Jogos e Aplicativos 

• Desenvolvimento de 
Sistemas Prdprios 

—CURSOS 

• Linguagem Basic Com 
aulas pr£ticas 

• Apostilas gratis 

• Desenvolvimento de 
programas 

— BIREAUX DE 

SERVIQOS 

• Administragao 

• Contabiiidade 

• Estoque 

• Folha de pagamento 

• Etc. 

—MERCADO DE 
MICROS USADOS— 

• Agenciamento 

• Compra e Venda 

Rua Buenos Aires, 41 
3° andar — Centro 
CEP 20.070 5 

Rio de Janeiro ? 

Tel. 263-4024 











O que voce acha de proteger seus programas atravte de um sistema de senhas? 
Veja como isso 4 possfve! no DGT-100 e equipamentos compativeis 



Programe a senha 
e tchau abelhudos ! 

Mario Lu/'s Terenzi 



uitas vezes, ao escrevermos um 
determinado programa, seria 

|otimo se puctessemos tomar 

certas linhas invisiveis aos olhos de al- 
guns usudrios. Um bom exemplo seria 
um programa que gerasse uma sequen- 
cia de numeros ou palavras para serem 
descobertas. Em casos como este, escon- 
der do jogador a rotina que gerasse tais 
sequences seria algo extremamente 
util. 

Outra aplica^o bastante interessante 
esta ligada a protefao de programas, e 
uma das formas de protege-losd restrin- 
gindo a possibilidade de execu^o dos 
mesmos a um numero reduzido de usua- 
rios autorizados. A maneira de autorizar 
seria atravds do conhecimento de uma 
senha (password) que seria solicitada 
pelo programa. Desta forma, o trecho 
em que tal senha fosse gerada deveria ser 
protegido contra usuarios bisbilhoteiros. 
Um exemplo que daremos a seguir aju- 
dara a esclarecer esta segunda situa^o. 

Para que determinadas linhas de seu 
programa (consecutivas ou nao) nao 
possam ser listadas no video, voce deve- 
r i obedecer aos seguintes passos: 

1) Digite a linha do programa que voce 
deseja esconder (esta linha devera pos- 
suir menos de 1 1 5 caracteres). 

2) Liste a linha digitada e verifique se o 
seu conteudo esta correto. 

3) Conte o numero de caracteres que a 
linha possui, incluindo a numera^o das 
mesmas e os espa?os em branco. 



4) Tecle EDflT < numero da linha > 
e passe para o modo de edi?So (digitan- 
do RETURN). Digite entfo X para que 
a linha toda seja mostrada e para posi- 
cionar o cursor no final da mesma. 

5) Digite REM seguido do mesmo nu- 
mero de caracteres contados no passo 3 
e some mais cinco. Podem ser digitados 
quaisquer caracteres. Como eles nSo po- 
derSo ser vistos novamente, tome cuida- 
do para entrar com o numero correto de 
caracteres. 

6) Tecle SHIFT e + (up arrow ) simul- 
taneamente para sair do modo de inser- 
9 ao. 

7) Digite o numero contado no passo 3 
mais cinco (tal numero n2o aparecera na 
tela quando digitado) e entao tecle 
(backspace). Por exemplo: se voce con- 
tou 33 caracteres, digite 38 «- . Isto 
fard com que o cursor fique posicionado 
imediatamente ap6s o M do REM. Caso 
isto nSo ocorra, tecle X e volte ao inicio 
deste passo. 

8) Entre novamente com o numero digi- 
tado no passo 7, seguido de C (observa- 
9 ao: nSo aperte RETURN ainda). 

9) Aperte a tecla atd chegar ao final 
da linha anterior. 

10) Agora tecle RETURN. Voce podera 
executar ou listar o programa, mas nao 
conseguira mais ver a linha desaparecida. 



PROGRAMA EXEMPLO 

Este exemplo mostra a aplica^o do 
sistema de senhas citado, alem de escla- 
recer os passos do processo que acaba- 
mos de descrever. Seja o seguinte pro- 
grama: 



10 PRINT "ESTE PROGRAMA E PROTEGIDO" 
20 PRINT "DIGITE A SENHA" 

30 INPUT A$ 

31 B$=" SENHA" 

40 IF A$=B$ THEN 70 
50 1=1+1 

60 IF I> 2 THEN NEW ELSE 20 
70 PRINT "BOM TRABALHO" 



A senha estd assinalada na linha 31. 
Se algudm listar o programa. descobrira 
o segredo imediatamente. E necessario 
sumir com tal linha. Portanto, sigamos 
os passos: 

1 ) Liste a linha 3 1 . Ela possui 1 3 carac- 
teres (+5=18). 

2) Digite EDIT 31 e RETURN. Voce es- 
ta agora no modo de edisao. Tecle X. 

3) Digite REM 123456789012345678 
(18 caracteres quaisquer). 

4) Digite SHIFT + simultaneamente. 

5) Digite 1 8 +- 

6) Digite 18 C. 

7) Aperte atd chegar ao final da li- 
nha anterior. 
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8) Digite RETURN e liste o programa. 

Vocd listou todo o programa, exceto 
a linha 31 (que contdm o segredo da se- 
nha). De um RUN e teste o programa. 
Voce vera que tres tentativas erradas 
provocam a sua remo 9 So da memriria 
principal. Desta forma, voce conseguiu 
controlar o programa e regular seu uso. 

£ claro que sempre existem maneiras 
de se burlar o sistema. Por exemplo, se 
voce possuir uma impressora e listar o 
programa, todas as linhas aparecerSo. Ha 
tambdm a possibilidade de algudm des- 
cobrir o nurfiero da linha desaparecida e 
usar o comando EDIT para ve-la. As ve- 
zes, entao, 6 necessario sofisticar um 
pouco o mdtodo: podemos exigir mais 
de uma senha ou entao sumir com va- 
rias linhas do programa. Neste caso, pro- 
cure nao colocar todas as senhas em li- 
nhas consecutivas. 

De qualquer forma, existem mil apli- 
cagOes para o macete que acabamos de 
descrever. £ s6 botar a cabe 9 a para fun- 
cionar. ■ 

M 



Mirio Luis Terenzi 6 Analista de Suporte de 
Sistemas do Centro de Computaqao da Uni- 
versidade Federal de Minas Gerais e estudante 
do Ultimo ano do Bacharelado em CiSncias da 
ComputaoSo da mesma escola. 



Nao pare seu programa 
nem perca a memoria 

GERATRON 

Gerador Eletronico Portatil de 200 VA 

Jff 




GUARDIAN 



O Gerador Eletronico GERATRON 
e a soluc§o definiliva para 
o problema de falha na reoe 
eletrica. Quando esta laltar, 
GERATRON continuard alimentando 
o seu micro como se nada 
houvesse acontecido. Chame 
um representante hoje mesmo. 



Equipamentos Eletronicos Ltda. 

ALTA TECNOlOGIA EM ELETRONICA INDUSTRIAL 

RuaDr Gamier. 579 . Rocha • CEP 20971 • RJ . Tels (02 1 1 201-0195 261-6-158 e 281-3295 • Tele* (021 1 3-t0t 6 
• Sao Paulo (01 1) 270-3175 e 241-7511 • Brasilia (061)226-0133 • Salvador (071) 241-2755* Recite (081 ) 221-0142 
• Natal (084) 222-3212 • Belem (091 ) 222-5122 • Fortaleza (085) 226-0871 • Curitiba (041 ) 224-5616 
| Flonanopolis (0482) 23-0491 • Blumenau (0473) 22-6277 • Porto Alegre (0512) 22-5061 



Programas para D 8002, CP 500, DGT 1000, TRS 80, NAJA, JR e outros. 

Temos disponfveis mais de 50 programas para os micros acima e outros de maior porte. 
Consulte-nos. 



* 




•8 

c 








S 

£ 


Programa 


Fita 


Diskete 






(Cr$) 


(Cr$) 




Contabilidade 


29.487,00 


176.924,00 


p 


Folha de Pagamento 


— 


70.769,00 


« 


Controle de Estoque 


47.179,00 


117.949,00 


% 


Mala Direta 


35.384,00 


88.462,00 


i 


Mala Direta c/Ed. Texto 





147.437,00 


1 


Contas a pagar/receber 


35.384,00 


88.462,00 


5 


Tesouraria (C. saldo bancirio) 





88.462,00 


Q. 


CrediSrio (p/D 8002) 





88.462,00 


§ 


Admin, de Imoveis 


— 


324.361,00 




Editor de Texto 


23.589,00 




£ 


Controle de Custos 


29.487,00 





c 


Arquivo de Processos 


17.692,00 




8 


Controle de Livros 


14.743,00 





8 


Controle de Cheques 


14.743,00 





E 


Biorritimo 


11.794,00 


17.794,00 


2 


Decisao 


12.974,00 


18.974,00 


E 


Obstaculo 


12.974,00 


18.974,00 


fi 


Kit MatemSt. c/ 6 progr. 


47.179,00 


55.179,00 




Jogos Amerc. (Fita c/4) 


16.500,00 


22.500,00 



no/oion 

/i/temo/ 

Tfrar 




• Antes de comprar seu computadorsolicite nossa assessoria, 
sem compromisso, para andlise, implantagao e apoio. 

• Desenvolvemos qualquer tipo de software especffico, de 

acordo com as necessidades de sua _ 

• Descontos para revenda. 

• Atendimento por reembolso / c 

para todo Brasil. / 



Av. Rio Branco, 45 gr. 1311 - 
Tel: (021) 263-1241 - Rio de 



CEP 20090 
Janeiro 



TARA^OUTB 08 
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ATE AGORA VOCE ESCOLHI A 
UM MICROCOMPUTADOR 
PELO QUE VIA POR FORA. 





A MAGNEXmostra a alta tecnologia que o microcomputador MANAGER I® tern pordentro, para executar com 

eficiencia o trabalho que o espera aqui fora. 



HARDWARE 

• 02microprocessadoresZ80e 6502 

• Memoria RAM de 64KB (250NS), expandivel para 128KB 

• Monitor residenteem EPROM de 2KB 

• Interpretador Basic residente em EPROM de 10KB 

• Interfaces para: 

• Monitor de video preto/branco ou fosforo verde (1920 
caracteres) 

• Monitor de video a cores padrao PAL-M e RGB 
analogico 

• Impressora paralela 

• Discos flexiveisde 5 V4" 

• MODEMS e demais perifericos seriais 

• 06 conectores adicionais para expansao compativeis 
com Apple II* 

• Teclado profissional destacavel 



SOFTWARE 

MX-DOS 

• Compativel com DOS 3.3 do Apple II* 

MAGNOSI® 

• Compativel com CP/M* 

APLICACOES 

• Nas empresas de pequeno porte, e no processamento 
distribuido nas empresas de medio/grande porte em 
aplicacoes nas areas administrativa, financeira, 
comercial, estatisticas, etc. 

• Na area Tecnica-Cientifica, em aplicacoes especificas 
de pesquisa e desenvolvimento. 

• Para Profissionais Liberais, como computador 
pessoal. 

• Apple II e CP/M sao marcas registradas de Apple 
Comp. Corp. e Digital Research Corp. - USA. 




Gorontio incondicionol de quolidode 



MAGNEX ELETRONICA LTDA. 

Rua Dr. Thyrso Martins, 100- Tels.: 570-2872 - 549-2232 -Telex: (011)4837 DLTD-CEP: 04120- Vila Mariana - Sao Paulo 





Curso de 
Assembler — X 




esta li 9 ao vamos continuar a descn^ao das mstru^oes 
que compOem o grupo de troca, transference de 

J bloco e pesquisa. 

1 1 - Compara byte e incrementa 
Formato: CPI 

Operagao: Compara um byte com o Acumulador, incre- 
menta HL e decrementa BC. 

Codigo Objeto: 



1110 110 1 ^ED 

— i — i ii — I — h—l — 

1 0 1 0 0 0 0 1 ►Al 

iii i i ■ i _ 

Descrigao: 0 byte contido no endere<;o de memoria especi- 
ficado pelo conteudo do par de registradores 
HL e comparado com o conteudo do Acumula- 
dor. Se o resultado da compara 9 ao for verdadei- 
ro, a flag Z 6 setada. Caso contrario, ela e resse- 
tada. 0 par de registradores HL e incrementado 
e o par de registradores BC e decrementado. 

CPI A = (HL) 

HL-* HL ♦ 1 



Ciclos de mdquina (M): 4 

States (T): 16(4,4,3,5) 

Flags afetadas: S - setada se o resultado for negativo. 

Caso contrario, 6 ressetada; 

Z — setada se A = (HL). Senao, 6 resse- 
tada; 

H — setada se ocorre um emprdstimo pa- 
ra o bit 4 ; 

P/V — setada se BC-1=£0. Senao, 6 resseta- 
da; 

N — setada; 

C — nao afetada. 

Como exemplo, se o par de registradores HL contdm 
111 1H, a posi 9 §o de memoria 1111H contem o byte 3BH, o 
Acumulador contem 3BH e o par de registradores BC contem 
1H, apos a execu 9 ao da mstru 9 ao CPI, o par de registradores 
BC conterd 0, o par HL terd 1 1 12H e a flag Z estara no modo 
Z. 



Outro exemplo: comparar 80 bytes consecutivos: 



2000 

rooo 

7000 

7000 210020 
7003 110030 
7006 015000 
7009 10 
7000 ED01 
700C 200D 
700E 13 
700F E 20970 
7012 212070 
7015 CD6744 
701B C32D40 
70 IB 212370 
701 E IBF5 
7020 4F 

7022 03 

7023 45 
7027 03 
7000 

OOOOO TOTAL 

7.4284 TEXT 



OOIOO BUF1 

001 lO BUF2 

00120 

00130 1N1T 

00140 

00150 

00160 LOOP 

00170 

00180 

00190 

00200 

00210 

00220 FIM 

00230 

00240 ERRO 

00250 

00260 nsci 
00270 
00280 MSG7 
00290 - 
00300 

ERRORS 

APEA BVTES LEFT 



1 2 - Compara um bloco de bytes incrementando 
Formato: CPIR 

Operagao: Compara um bloco de bytes com o conteudo 
do Acumulador. 

Cddigo objeto: 



1110 110 1 ► ED 

—I — i — I — l — l — I — l — 

1 0 1 1 0 0 0 1 ►bi 

I I 1 I I — I — I — 

Descrigao: 0 byte contido no endere 90 de memdria especi- 
ficado pelo conteudo do par de registradores 
HL e comparado com o conteudo do Acumula- 
dor. Se o resultado da compara 9 ao for verdadei- 
ro, a flag Z 6 setada. Caso contrdrio, ela 6 resse- 
tada. 0 par de registradores HL 6 incrementado 
e o par de registradores BC 6 decrementado. A 
instru 9 ao termina quando o conteudo do par de 
registradores BC 6 zero ou quando o resultado 
da compara 9 ao e verdadeiro. 

CPIR A = (HL) 

HL-d HL + 1 



BC - 1 
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Ciclos de mdquina (M): 5 
States (T): 21(4,4,3.5,5) 

Flags afetadas: S — setada se o resultado e negativo. 
Senao, e ressetada; 

Z - setada se A = -(HL). Caso contrdrio, 
e ressetada; 

H - setada se ocorre um emprdstimo 
para o bit 4; 

P/V — setada se BC-l^^O. Senao, e resseta- 
da; 

N — setada; 

C — nao afetada. 

Como exemplo, se o par de registradores HL contem 
111 1H, o Acumulador (registrador A) contem F3H, o par de 
registradores BC contdm 7H e as pos^oes de memoria tern os 
conteudos: 

(111 1H) — 52H 
(1 1 12H) — OOH 
(1 1 13H) — F3H 

entao, ap6s a execu 9 ao da instru 9 ao CPIR, o conteudo de 
HL serd 111 4H, o conteudo de BC sera 4H e a flagZ estara 
setada. 

Outro exemplo: comparar 80 bytes consecutivos de memo- 



ria com 3FH. 








3000 




00100 BUF1 


EOU 


3000H 


i BUF 1 - 3000H 


7000 




00110 


ORG 


7000H 


t ENDERECO P/MONTAR 0 PROGRAMA 


7000 


3E3F 


00120 IN1T 


LD 


A.3FH 


1 A <- BYTE A SER PESOUISADO 


7002 


210030 


00130 


LD 


HL.BUFl 


1 CARREGA EM HL 3000H 


7005 


015000 


00140 


LD 


BC. 80 


SPESOUISA 80 BYTES 


7008 


EDB1 


00150 


CPIR 




! COMPARA SO BYTES AC IMA DE BUF 1 


700A 


2009 


00160 


JR 


NZ.ERRO 


IDESVIA SE NAO EXISTE 


700C 


21 1A70 


00170 


LD 


HL . MSG 1 


1 HL MENSAGEM 1 


700F 


CD6744 


00180 FIM 


CALL 


4467H 


i DISPLAY MENSAGEM 


7012 


C32D40 


00190 


JP 


402DH 


I RETORN A AO S1STEMA 


7015 


21 1D70 


00200 ERRO 


LD 


HL.MSG2 


1 HL <- MENSAGEM 2 


7018 


1BF5 


00210 


JR 


FIM 


IDESVIA PARA DISPLAY 


70 1 A 


4F 


00220 MSG1 


DEFM 


•OK- 


1 DEFINE MENSAGEM 1 


701C 


03 


00230 


DEFB 


'S 


! DEFINE TERMINADOR 


70 ID 


45 


00240 MSG2 


DEFM 


•ERRO- 


1 DEFINE MENSAGEM 2 


7021 


03 


00250 


DEFB 


3 


1 DEFINE TERMINADOR 


7000 




00260 


END 


INIT 


1INICIA 0 PROGR. EM INIT 


OOOOO TOTAL 


ERRORS 








34429 


1 TEXT 


AREA BYTES LEFT 









H — setada se ocorre um emprdstimo pa- 
ra o bit 4; 

P/V - setada se BC-1^0. Senao, e resseta- 
da; 

N - setada; 

C - nao afetada. 

Como exemplo, se o par de registradores HL contem 
1 1 1 1H, a posi 9 ao de memdria 1 1 1 1H contdm 3BH, o Acumu- 
lador contdm 3BH e o par de registradores BC contem 1H, 
apos a execu 9 <fo da instead CPD, o par BC sera igual a zero, 
o par de registradores HL conterd 1 1 10H e a flag Z estard seta- 
da. 

Outro exemplo: comparar 80 bytes consecutivos com 55H: 



3000 




00100 BUF 1 


EOU 


3000H 


1 BUF 1 - 3000H 


7000 




001 10 


ORG 


7000H 


i ‘ENDERECO P/MONTAR 0 PROGRAMA 


7000 


3E55 


00120 INIT 


LD 


A.5SH 


iA <- BYTE A SER PESOUISADO 


7002 


210030 


00130 


LD 


HL.BUFl 


1 CARREGA EM HL 3000H 


7003 


013000 


00140 


LD 


BC.SO 


! PESQUISA 80 BYTES 


7008 


EDA9 


00130 LOOP 


CPD 




i COMPARA A COM POS.DADA POR HL 


700A 


280C 


00160 


JR 


Z,OK 


IDESVIA SE EXISTE 


700C 


E20B70 


00170 


JP 


PO, LOOP 


1F;EPETE SE BC <> O 


700F 


212070 


00180 


LD 


HL.MSG2 


I HL <- MENSAGEM 2 


7012 


CD6744 


00190 FIM 


CALL 


4467H 


! DISPLAY MENSAGEM 


7015 


C32D40 


00200 


JP 


402DH 


» RE TORN A AQ SISTEMA 


7018 


211D70 


00210 OK 


LD 


HL , MSG l 


t HL <- MENSAGEM 1 


70 1 B 


18F5 


00220 


JR 


FIM 


IDESVIA PARA DISPLAY 


70 ID 


4F 


00230 MSG1 


DEFM 


-OK- 


1 DEFINE MENSAGEM 1 


70 IF 


03 


00240 


DEFB 


3 


I DEFINE TERMINADOR 


7020 


43 


00250 MSG2 


DEFM 


• ERRC * 


i DEFINE MENSAGEM 2 


7024 


03 


00260 


DEFB 


3 


! DEFINE TERMINADOR 


7000 




00270 


END 


INIT 


ilNICIA 0 PROGR. EM INIT 


OOOOO TOTAL 


ERRORS 








34398 TEXT 


AREA BYTES LEFT 









14 — Compara um bloco de bytes decrementando 
Formato: CPDR 

Operagao: Compara um bloco de bytes com o conteudo 
do Acumulador. 

Codigo objeto: 

CPDR 



13 - Compara byte e decrementa 
Formato: CPD 

Operagao: Compara um byte com o Acumulador e decre- 
menta HL e BC. 

Codigo objeto: 

CPD 



ED 
A9 

Descrigao: 0 byte contido no endere 90 de memoria especi- 
ficado pelo conteudo do par de registradores 
HL e comparado com o conteudo do Acumula- 
dor. Caso a compara 9 ao seja verdadeira, a flag Z 
e setada; caso contrdrio, e ressetada. Entao, os 
pares de registradores HL e BC sao decrementa- 
dos. 





Descrigao: 0 byte contido no endere 90 de memoria especi- 
ficado pelo conteudo do par de registradores 
HL e comparado com o conteudo do Acumula- 
dor. Caso a compara 9 ao seja verdadeira, a flag Z 
e setada. Os pares de registradores HL e BC 
sao decrementados e a instru 9 ao termina quan- 
do o conteudo do par de registradores BC e 
zero ou quando a compara 9 ao 6 verdadeira 
(A = (HL)). Se BC 6 diferente de zero, a instru- 
9 ao e repetida. 



CPDR A = (HL) 




CPD A = (HL) 




Ciclos de mdquina (M): 4 
States (T): 16(4,4,3,5) 

Flags afetadas: S - setada, se o resultado e negativo. 
Senao, e ressetada; 

Z — setada se A = (HL). Senao, e resse- 
tada; 



Ciclos de mdquina (M): 5 
States (T): 21(4,4,3,5,5) 

Flags afetadas: S — setada se o resultado 6 negativo. 
Senao, 6 ressetada; 

Z — setada se A = (HL). Senao, 6 resse- 
tada; 

H — setada se ocorre um emprdstimo 
para o bit 4; 

P/V - setada se BC-l^O. Senao, e resseta- 
da; 

N — setada;, ^ 

C — nao afetada. ® 
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CURSO DE ASSEMBLER - X 



Como exemplo, se o par de registradores HL contem 
1 1 18H, o Acumulador contem F3H, o par de registradores BC 
contem 3H e o conteudo das posigoes'de memdria e: 

(1 1 18H) — 52H 
(1 1 17H) — 00H 
(1 1 16H) — F3H 

entao, ap6s a execugao da instrugao CPDR, o conteudo do 
par de registradores HL sera 1115H, o conteudo de BC sera 0 
e a flag Z estd setada. 

Outro exemplo: comparar 80 bytes consecutivos com FFH. 



3000 




00100 BUF 1 


ECU 


7000 




00110 


ORG 


7000 


3EFF 


00120 INIT 


LD 


7002 


210030 


00130 


LD 


7003 


013000 


00140 


LD 


700B 


EDD9 


00150 


CPDR 


700A 


2009 


00160 


JR 


700C 


2! 1A70 


00170 


LD 


7U0F 


CDt.74<( 


00180 FIM 


CALL 


7012 


C32D40 


00190 


JP 


7013 


211D70 


00200 ERRO 


LD 


70(8 


1BF3 


00210 


JR 


701 A 


4F 


00220 MSG1 


DEFM 


701C 


03 


00230 


DEFB 


701 D 


43- 


00240 MSG2 


DEFM 


7021 


OS 


00230 


DEFB 


7000 




00260 


END 


00000 TOTAL 


ERRORS 





34427 TEXT AREA BYTES LEFT 



30OOH IBUF1 - 3000H 

7000H < ENDERECO P/MONTAR O PROGRAHA 

A.OFFH I A - BYTE A SER PESCJUISADO 
HU. BUF1 iCARREGA FM Hu 300OH 
DC . 30 (PESQU1SA 90 BYTES 

; COHPARA BO BYTES ADA I XO DE BUFt 
NZ.ERRO :DESVIA SE NAO EXISTE 
HL.MSG1 (HL <- MENSAGEM 1 
4467H (DISPLAY MENSAGEM 

402DH (RETORNA AO SISTEMA 

HL.MSG2 (HL <- MENSAGEM 2 
FIM (DESVIA PARA DISPLAY 

•OK* (DEFINE MENSAGEM 1 

3 [DEFINE TERMINADOR 

•ERRO- (DEFINE MENSAGEM 2 

3 (DEFINE TERMINADOR 

INIT (INICIA 0 PROGR. EM INIT 



0 GRUPO DE ARITMETICA E LOGICA 



Descrigao: 0 conteudo do registrador r 6 somado ao con- 
teudo do Acumulador e o resultado 6 carregado 
no proprio Acumulador. 0 simbolo r identifica 
os registradores A, B, C, D, E, H e L. Qualquer 
operagao de soma envolve o Acumulador. 

ADD A , B A + B 

Ciclos de maquina (M): 1 
States (T): 4 

Flags afetadas: S - setada se o resultado 6 negativo. 
Senao, 6 ressetada; 

Z — setada se o resultado 6 zero. Senao, 
e ressetada; 

H — setada se ocorre vai-um do bit 3. 
SenSo, 6 ressetada; 

P/V — setada se ocorre um overflow. Se- 
nao, 6 ressetada; 

N — ressetada; 

C — setada se ocorre vai-um do bit 7. 
SenSo, 6 ressetada. 

Outro exemplo: somar 200 com 17: 



LD 


A, 200 


LD 


D , 1 7 


ADD 


A f D 



0 prdximo grupo de instrugSes do microprocessador Z80 6 

0 grupo de aritmdtica e 16gica de 8 bits. Este grupo executa as 
seguintes fungoes: 

— Adigao e subtragao 

— Operates ldgicas 

— Comparagao 

— Incrementos 

— Decrementos 

As instrugoes que compoem este grupo sao as seguintes: 

1 - Soma Acumulador com registrador 

Formato: ADD A,r 

Operagao: Soma o conteudo de um registrador de 8 bits 
com o Acumulador. 

Cddigo objeto: 

ADD A , r 



0 conteudo do Acumulador apos a execugao do programa 
sera 217, enquanto 17 serS o conteudo do registrador D. 

2 - Soma Acumulador com constante 
Formato: ADD A,n 

Operagao: Soma o conteudo do Acumulador com uma 
constante. 

Cddigo objeto: 

ADD A,n 



1 1 0 0 0 1 


i 

1 0 






^ n 

i i i i i — 


w 

i_j 



— i — l — I 1 — i — i r— 

1 0 0 0 0 r r r 
i — i — i — i — i — i — i— 



ADD A , L 



| “1 




1 0 0 0 0 1 0 1 

I'll 1 1 — 1 — 
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ADD A, 5 



> C6 
>05 



Descrigao: 0 inteiro n e somado ao conteudo do Acumu- 
lador e o resultado 6 carregado no Acumulador. 





— 1 — 1 — 1 — 1 — 1 — 1 — 1 — 
1 1 0 0 0 1 1 0 


0 0 0 0 0 1 0 1 

' I I — 1 — 1 — 1 — 1 — 


w 



000 


para 


rrr 


= 


001 


para 


rrr 


= 


010 


para 


rrr 


= 


01 1 


para 


rrr 


= 


100 


para 


rrr 


= 


101 


para 


rrr 


= 


111 


para 


rrr 


= 



registrador B 
registrador C 
registrador D 
registrador E 
registrador H 
registrador L 
registrador A 



ADD A , n A-4 A + n 

Ciclos de maquina (M): 2 
States (T): 7(4,3) 

Flags afetadas: S - setada se o resultado 6 negativo. 
Senao, e ressetada; 

Z — setada se o resultado £ zero. Senao, 
e ressetada; 

H — setada se ocorre vai-um do bit 3. 
SenSo, e ressetada; 

P/V — setadase ocorre um overflow. Senao, 
ressetadS; 
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A geracao def initiva e sempre a proxima 




Vocfi s6 descobre o quanto precise de um Micro-Corn- 
putador JR da Sysdata depots que o conhece de perto. 

Vocd vai ter certeza de que fez um dtimo negdcio ao 
adquirf-lo assim que o coiocar na sua empresa ou na sua 
casa. 

O JR da Sysdata 6 rdpido, 6 versAtfl, 6 compacto. 



Contabilidade, controte de contas a pagar, controte de 
contas a receber, folha de pagamento, controte de esto- 
que, controte de cbentes, reiatdrio de clientes, mala direta, 
cdlculos de orgamentos financeiros.controledeprocessos 
industrials, cAlculos de engenharia, cSIculos de estatfeb- 
cas, fungOes matemAticas, fungOes Idgicas em cadeia de 
caracteres (STRINGS). grAficos, jogos animados, progra- 
mas educacionais. 

O JR PERMVTE AINDA: 

0 acesso a grandes sistemas de computagSo, a comurv- 
cagdo entre os departs mentos de Empresa, efetuar pro- 
gramas especfficos para cada Empresa. 

E, comose nSobastasse, ele 6 o Micro-Computadorde 



Com todas as qualkJades que tern, o JR da Sysdata nem 
precisava ser tdo econdmico. Mas 6. 

Afinal, ele 6 o mais completo Micro-Computador de sua 
geragdo. 

Inclusive no prego. 

Vocd pode testa r estas e outras qualidades do JR em 
qualquer dos nossos revendedores. 



Rua Jorge Duprat Ftgueiredo, 647 • CEP 04361 
Vila Santa Catarina Sio Paulo ■ SP 
Forres: 6421122 531-0390 531-0410 
Teles (Oil) 23579 









# V 




lit] 







REVENDEDORES: SAO PAULO: Capitol - AD Date = 864 8200 ADP System - 227-6100 - Sucker = 881-7995 - Compushop - 212-9004/210-0187 Compute - 
852 8290/257 3952 Computerland - 258 3954/1573 Foto l*o - 35 7131 Guedes - 289-9051 • Interface - 852-5603 - Lema - 210-5929 - Moppin - 
258-4411/258-7311/9358 Microrei - 881 0022 - Microehop - 852-5603 • Miprotec - 289 4941 • Rental = 543-9853 Runner* = 68 3779 Sacco - 814-0598 
Servimec - 222-1511 - Sistemac - 282-6609 - Sos - 66-7656 Camptnee - Computer House « (01921 852-5855 - Microtofc « (01921 32-4446 - SAo Joed do Rk> 
Preto Composys - (0161 635 1 195 Seno - (016)32-0600 Mo»l Ooepu Guapumaq - (019)261-0236 Teubetd Enaicom - (0122)33 2252 PERNAMBUCO 
Recife Etogoi - (080)241 1162/241-1149 GOlAS - Gotdnia Case do M*ocomputedor = (062) 223 1 165 Grupom (062) 225 8226 MATO GROSSO DO SUL - 
Cempo Grande DRL =■ (067) 382 6487 - Video Computadores - (067) 321-4220 - BRASILIA- Cepital Compushow » <061)273-2128 Digrtec - 1061)225-4534 
RIODE JANEIRO -Capital Clap - (021 ) 2884)734/284 5649 Computique - (021 ) 267 1093 Kristian - (021) 252-9067 Micromaq - (021)222-6088 Petrdpo- 
ie • Foto Ot<ca « (0242142-1393/43 6120 PARANA - Londrine Shop Computer - (0432) 23 9674 Umuarema CBMComercial - (0446)23-2233 Curitiba 
Micro System = (041) 232 3533 PontaGroua Grupo Oata Memory = (0422) 24 6191 PARAlBA JoAo Paesoa Medusa =4083) 221 6743 CEARA - Fortaleza 
Siscomp = (085)244-4691 - MINAS GERAIS - Balo Horizonte - Compucity - 1031 1 226-6336 Kemitron - (031 1 225-0644 - PrO Informatxra = (0311337 8792 
SANTA CATARINA • Blumenau Proiesul • (0473) 22 3848 HoriandpoUe • Castro = (0482) 22-6933 • Inlotec - (0482) 23-4777 RIO GRANDE OO SUL - Novo 
H embargo Mcromega = (0512) 93-4721 - Porto Alegre Advenong = (0512)26-1194/264)194 Digital - (0512) 40 1 998/24 141 1 Micros* - (0512)22-9782- 
Ststemarica = (0512)214)732/21-0835 









CURSO DE ASSEMBLER - X 



N - ressetada; 

C — setada se ocorre vai-um do bit 7. Sc- 
n3o. 6 ressetada. 

Como exemplo, para somar 200 com 17, tcremos: 

LD A, 200 

ADD ’ A, 17 

0 conteudo do acumulador ap6s a execu$So do programa 
serf 217. 

3 — Soma Acumulador com memdria 
Formato: ADD A,(HL) 

Opera^ao: Soma o Acumulador com o conteudo do ende- 
re 90 de memdria apontado pelo par de registradores HL. 
Cddigo objeto: 

ADD A t ( HL ) 



— i — r — r — i — i — r— i — 
1 0 0 0 0 1 1 0 

I I ■ 1 1 1 1 



>86 



Descriijdo: 0 byte do endere^o de memdna especificado 
pelo conteudo do par de registradores HL 6 so- 
mado ao conteudo do Acumulador e o resulta- 
do 6 carregado no Acumulador. 



ADD A y ( HL ) A < A ♦ (HL) 

Ciclot de maquina (M): 2 
States (T):7(43) 

Flags afetadas: S - setada se o resultado 6 negativo. 
SenSo, 6 ressetada; 



Z - setada se o resultado i zero. SenSo, 
£ ressetada; 

H — setada se ocorre vai-um do bit 3. 
SenSo, 6 ressetada; 

P/V - setada se ocorre um overflow. Se- 
nao 6 ressetada; 

N — ressetada; 

C — setada se ocorre vai-um do bit 7. 
SenSo, 6 ressetada. 

Como exemplo, se o conteudo do Acumulador 6 AOH, o 
conteudo do par de registradores HL 6 2323H e o conteudo da 
posi^So de memdria 2323H 6 o byte 08H, ap6s a execu^So da 
instrugSo ADD A, (HL), o conteudo do Acumulador serf 
A8H, o conteudo do par de registradores HL serf 2323H e o 
conteudo da posifSo 2323H serf 08H. 

4 - Soma Acumulador com memdria indexada (IX) 

Formato: ADD A, (lX*d) 

Operaqdo: Soma o Acumulador com o conteudo do ende- 
re$o de memdria apontado pelo registrador 
indexador IX mais o deslocamento explicito na 
instrufffo. 



Cddigo objeto: 



ADD A, ( IX+d) 



t~~ 

1 1 


— 

0 


I 

1 1 


1 — 
1 0 


— 

1 


1 0 


0 


0 0 


1 1 


0 












_Zj 1 1 1 1 i 1 — 
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BIBLIOTECA BRASILEIRA DE SOFTWARE 



Diversoes 
e Jogos 
Pessoais 



Uso Caseiro 

Comerciais 

Graficos 



Educacionais 

Profissionais 

Cientificos 



que voce pode retirar 
e levar para 
sua casa ou 
empresa para 
usa-lo a vontade. 



Para os principals 
micros do mercado: 
TK82, TK83, TK85, 
TIMEX/SINCLAIR, 
CP200, CP300, CP500, 



TRS80 Mod. Ill, 

UNITRON, MAXXI, 
Microengenho, 

Apple e Similares, 
Sistema 700 e Superbrain. 



Voco potto consultar passoalmonta os catAlogo* do Softworo ou solicitor Informocfios polo Corroio. * 

Av. Brigodoiro Forio Umo, 1390 - 8.* Andor - Cj. 82 - CEP 01452 • Tols.: 1011) 814-0682, 813-8407o 210-1257 - Soo Paulo - SP 



I NFOIVMrtX 




%/a m HC pynlipnr TotalWare b ao mesmo tempo hardware e software, 

VCI 1 1 lUo CA|/llvGI ■ equipamento e oportunidade, servigo e confiabilidade, 
programa e consulta, atendimento e novos produtos, enlim, um componente novo e indispensbvel 
para o seu microcomputador. 

TotalWare 6 uma exclusividade CompuShop, a loja especializada em microcomputadofes 
onde voc£ encontra software, perifericos, acessorios, a mais completa linha de livros e revistas 
nacionais e importados bem como diskettes e formularies. albm de cursos e assistbncia 
tbcnica permanente. Tudo a pres os especialmente programados. 

Na CompuShop a preocupa^o b fazer com que vocb tenha 
o microcomputador certo, de acordo com as suas necessidades. 

Mas a penas isso nao basta. Foi por isso que a CompuShop 
criou toaa uma infra- estrutura de apoio. 

Foi por isso que criou TotalWare. 



G)mpjSH()p 



Rua Dr. MArio Ferraz. 37 - CEP 01453 - SAo Paulo - SP - Tels. : (011> 2104)187/212-9004 /815-0099 - Telex (Oil ) 36611 BYTE BR 

Av. Pres. Juscelino Kubitschek. 889 - CEP 01543 - SAo Paulo - SP - Tels. : (Oil ) M-2806/8S2-7149. 
Estacionamento prOpno Abertas de Segunda a Sexta das 9 As 19 boras e aos Sabados das 9 As 14 boras. 



CURSO DE ASSEMBLER -X 



ADD 



A, (IX + 5 ) 



1 


— 

1 


— 

0 


r - ■ 

1 


— 

1 


— 

1 


— 

0 


1 


1 


0 


0 


0 


0 


1 


1 


0 


0 


0 


0 


0 


0 


1 


0 


1 
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Descrigao: 0 conteudo do registrador indexador IX 6 so- 
mado ao deslocamento d em formato de com- 
plement de 2 para deterrrunar o endereso de 
memdria. 0 conteudo da posi 9 ao de memdria 6 
somado ao conteudo do Acumulador e o resul- 
tado e carregado no Acumulador. 

ADD A, ( IX + d ) A 4 A + (IX+d) 

Ciclos de maquina (M): 5 
States (T): 19(4,4.3,5,3) 

Flags afetadas: S - setada se o resultado 6 negativo. 
Senao, e ressetada; 

Z — setada se o resultado 6 zero. Senao, 
6 ressetada; 

H — setada se ocorre vai-um do bit 3. 
Senao, 6 ressetada; 

P/V — setada se ocorre um overflow. Se- 
nao, 6 ressetada; 

N — ressetada; 

C — setada se ocorre vai-um do bit 7. 
Senao, i ressetada. 



Como exemplo, se o conteudo do Acumulador e 1 1H, o re- 
gistrador indexador con tern 1000H e o conteudo da posi 9 ao de 
memoria 1005H 6 22H, apos a execu 9 ao da instru^ao ADD A, 
(IX+5), o conteudo do Acumulador serd 33H e o conteudo da 
posi 9 ao de memoria 1005H serd 22H. 

5 — Soma Acumulador com memoria indexada (IY) 

Formato: ADD A,(IY+d) 

Operagao: Soma o Acumulador com o conteudo do ende- 
re 90 de memoria apontado pelo registrador in- 
dexador IY mais o deslocamento explicito na 
instru 9 ao. 

Codigo objeto: 

ADD A , ( I Y+d ) 



1 


1 


— 

1 


— 1 — 1 — 

1 1 1 


— 

0 


1 


1 


0 


0 


0 0 1 


1 


0 





















1 « 




w 



ADD A, ( IY + 1^ 3) 



1 


— 

1 


— 

1 


1 


1 


— 

1 


T— 

0 


— 

1 


1 


0 


0 


0 


0 


1 


1 


0 


0 


0 




0 

— 


0 


1 


1 


0 


1 
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TIG LOADER possibilita: 

• a localizagao do oumo volume do gravador, 
facilitando a operagao LOAD. 

• DUPLICAR qualquer programa. mesmo aque 
les "fechados". 

• carregar (LOAD) e DUPLICAR simultanea 
mente. 

• gravar (SAVE) em 2 gravadores ao mesmo 
tempo. 

• monitorar as operagoes LOAD. SAVE ou 
DUPLICAQAO atrav^s de tone. 

• filtrar as interferences eletricas de baixa 
frequencia, que sao a causa da maioria 
dos problemas de LOAD/SAVE. 



APLICATIVOS PARA TK E CP 200 

TIG-SCREEN: vinte e sete rotinas de video, para incrementar seus programas' 
Inversao de video, moldura. arquivo de imagens, rotagao, scroll em quatro 
diregSes. etc... efeitos visuais incri’veis! Em linguagem de maquina. ocupa 
1,3Kb, ficando protegido no RAMTOP, depois 6 so utiliza-lo onde quizer! 

P/ 16K Com manual explicativo Cr$ 8.000,00 

TIG-COMP-, coloque, em seus programas em BASIC, a velocidade de 
cddigo de maquina. Rodeos na (orma COMPILADA! Simples de usar, 
6 s6 carregar ou digitar o seu programa em BASIC e depois usar 
o TIG-COMP. Pronto! Voce tera o seu programa em linguagem de maquina em 
instantes. 

P/ 16K Com manual explicativo Cr$ 15.000,00 

TIG -SPEED: uma combinagaodesoft e hardware, permitindo uma transference 
de dados micro/cassete de 4.200 bauds. Voce podera carregar ou gravar 
16 Kb em 30 segundos! Acrescenta ao micro a fungao VERIFY. Facilimo de 
operar, compoe sede cassete, interface e manual explicativo. 

P/ 1 6 e 48K Prego sob consulta. 



Envie seu pedido ♦ cheque nominal cruzado 
Prazo de entrega: 15dias 

Despesas postais mclufdas nos pregos 

Atendemos vo mente por carta 



TIGRE COM. DE EQUIP. P/ COMPUT ADORES LTDA. 
(<(</ ’*>}>] Rua Correia Galvao, 224 

CEP01547 Sao Paulo SP 



CHEGA 

DE 

PROBLEMAS | 

Use Tig Loader 4 



APENAS: CR$ 15.000.00 



Descrigao: 0 conteudo do registrador indexador IY e so- 
mado ao deslocamento d em formato de com- 
plemento de 2 para determinar o endere 90 de 
memoria. O conteudo da posi 9 ao de memdria i 
somado ao conteudo do Acumulador e o resul- 
tado e carregado no Acumulador. 

ADD A , ( I Y + d ) A -A + (IY + d) 

Ciclos de maquina (M): 5 
States (T): 19(4,4,3,5,3) 

Flags afetadas: S - setada se o resultado 6 negativo. 
Senao, 6 ressetada; 

Z — setada se o resultado 6 zero. Senao, 
€ ressetada; 

H - setada se ocorre vai-um do bit 3. Se- 
nao, 6 ressetada; 

P/V - setada se ocorre um overflow. Se- 
nao, 6 ressetada; 

N — ressetada; 

C - setada se ocorre vai-um do bit 7. 
Senao, 6 ressetada. 

Como exemplo, se o conteudo do Acumulador e 1 1H, o 
conteudo do par de registradores IY 6 1000H e o conteudo da 
posi 9 ao de memoria 1008H e 22H, apos a instru 9 ao ADD A, 
(IY+8), o conteudo do Acumulador serd 33H e o conteudo da 
posi 9 ao de memdria 1008H sera 22H. 

At£ a proxima aula. S 



Amaury Correa de Almeida Moraes Junior 6 formado pelo curso de 
An&Use de Sistemas da FASP, tendo feito diversos cursos de aperfeifoa- 
mento nas Jreas de Eletrdnica Digital e Microprocessadores. 

Amaury trabalha como Analista de Sistemas na PRODESP, na irea de 
mini/microcomputadores, e presta consultoria a empresas para a implan- 
ta;ao de sistemas de microcomputadores. 
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O micro NAJA foi desenvolvido utilizando os mais modernos pad roes de arquitetura de Microcomputador, 
atingindo uma ampla faixa, desde os computadores pessoais at6 os utilizados em empresas 
de pequeno e medio porte. Uma de suas grandes vantagens 6 a sua versatilidade , ou seja, voce podera 
adquiri-lo na sua versSo mais simples, podendo voce mesmo expandi-lo a medida de suas necessidades, 

a um baixo custo 



CARACTERI'STICAS TECN/CAS 

• 48 K bytes de memdria RAM 

• 16 K bytes de memdria ROM 

• Clock de 3,6 MHz ou 2, 1 MHz comutado por Soft 

• Saida para impressora parale/a 

• 6 conectores para expansao no proprio gabinete 

• Microprocessador Z-80A 

• Video de 16 linhas por 64 ou 32 colunas 

• Interface de cassete para 1.500 ou 500 BPS 

• Linguagem Basic na ROM do si sterna 

• Software compative! com TRS-80 mod. Ill 

ACESS0RIOS 

• Monitor de video de 12" verde pro fission a I 

• In ter face para 4 unidades de disco de 51/4 " de dup/a dens. 

• Unidade de disco face simples ou dupla 

• Interface para 4 MHz de Clock 




LTDA. 



Av. Con tor no, 6048 - Savassi - Fone: 225-0644 
Telex -(031) 3074 - KEM! - BR Belo Horizonte-MG 








H£ um a no atr&s a Audio descobriu que nem s6 de som e imagem vive a indu stria 
e/etrdnica mundial... e inaugurou um departamento de inform^tica 



Audiodata 



44a Audiodata nasceu da constata- 
9 So de que a Informitica 6 um 
_A_“Jcampo florescente no mundo 
todo. 0 microcomputador 6 hoje uma 
necessidade e nJTo uma mania como tan- 
tas outras que aparecem. Por isso fize- 
mos questSo de nos tomai especia- 
listas no assunto. Hoje a Audio nfo 6 
mais conhecida apenas pelas Ire as de 
som e video ;ela 6 altamente especializa- 
da em microcomputadores, software, 
perifdricos e suprimentos.” 

£ assim que Eduardo Guay cur u, Di- 
retor de Informdtica da Audio, uma em- 
presa paulista tradicional no mercado de 
aparelhos de som e imagem, justificou a 
inaugura^o, hi um ano atr£s, de um de- 
partamento especializado em Informdti- 
ca : o Audiodata. Antes de inaugurar este 
novo ramo da empresa, Eduardo Guay- 
curu viajou para os Estados Unidos, on- 
de permaneceu, durante um ano e meio, 
realizando estudos e pesquisas sob're o 
mercado de micros norte-americano. 

ORIENT A^AO 

Na Audiodata o cliente encontra 
orienta^o tecnica na compra do micro- 
computador e do software adequados a 
sua real necessidade. Em um amplo 
show-room permanecem em exposisao 
equipamentos da Prol6gica, Digitus, Mi- 
crodigital, Poly max, Dismac e Spectrum; 
impressoras da Elebra e da Elgin. A loja 
comercializa, ainda, disquetes, fitas para 
impressora, fitas cassete, aldm de diver- 
sas revistas estrangeiras espedalizadas 
em Informdtica. 

A linha de software inclui pacotes 
importados, programas desenvolvidos 
pelas software-houses nacionais e pela 
propria Audiodata. “Hoje temos os nos- 
sos programas sendo utilizados pela Mo- 
nark Turismo, no controle de passagens; 
Escola Pentdgono, ajudando manias no 
aprendizado de linguagem BASIC; Pre- 
dial Rudggiero, na administragSo de 
im6veis; Fiorucci, no controle de esto- 
que ; e a prdpria Audio, em todos os seus 



: o espaco dos micros 




departamentos, com as mais diversas 
modalidades de utilizagfo”, afirma 
Eduardo. 

Todos os produtos comercializados 
pela Audiodata podem ser adquiridos 
por financiamento direto da prdpria lo- 
ja, atrav^s de financeira ou por agenda 
bancdria. Outras formas de comerciali- 
zag^o sao o leasing e um consbrcio ad- 
ministrado pela Audio -Brasilinvest. 

ALUGUEL DE EQUIPAMENTOS 

“Quando um cliente compra um pro- 
duto nosso, por exemplo um micro- 
computador, e logo em seguida esse 
equipamento apresenta um defeito, n6s 
prontamente o trocamos por outro. Se, 
ao inv^s disso, o micro vier a apresentar 
problemas apbs um periodo maior de 
tempo, n6s alugamos outro micro e o 
software que for necessdrio, at£ que o 
equipamento seja consertado. A m i- 
quina alugada podera ser usada na pr6- 
pria loja, no escritbrio ou na empresa. 
E um novo tipo de garantia que coloca- 
mos i disposi$2o do cliente”, esdarece 
Eduardo Guaycuru. 

Em relagSo ao movimento de clientes 
na Audiodata, Eduardo Guaycuru obser- 
vou, com certa surpresa, que 6 grande o 



mirnero de criangas que frequentam a 
loja trazidas pelos pais que querem in- 
troduzi-las no mundo da Informitica, 
diante do grande entusiasmo que estas 
mdquinas despertam na classe in fan til. 
“Vemos tamWm proprietaries de pe- 
quenas e madias empresas que jd sentem 
a necessidade do micro e atd fimdond- 
rios isolados, que precisam agilizar seus 
trabalhos, talvez como forma de garantir 
o emprego gragas a um maior rendimen- 
to”. 

Eduardo Guaycuru declarou ainda 
existir um certo preconceito com rela- 
gfo is lojas que comercializam outros 
tipos de produtos junto aos de Informd- 
tica. “Nao existem lojas incapacitadas 
para comercializar equipamentos de In- 
formdtica”; diz ele, “s6 porque tambdm 
vendem outros produtos. 0 nosso de- 
partamento 6 altamente especializado”. 

A Audiodata foi implantada nas seis 
lojas da Audio, cinco em Sffo Paulo e 
uma em SSo Bernardo do Campo. As 
tres principals lojas estSo localizadas na 
Av. Estados Unidos, 609; na Rua 24 de 
Maio, 196 e na Av. Morumbi, 1089. 



Tex to : ClAudia Salles Ramalho 
Foto : Nelson Jumo 
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NOVO CP 300 PROL0GICA. 




Compativel com 
programas em tlta 
cassete ou em disco. 



Agora, na hora de escolher entre um 
microcomputador pessoal simples, de fecil 
manejo e um sotisticado microcomputador 
profissional. voce pode ficar com os dois. 

Porque chegou o novo CP 300 Prologica. 

0 novo CP 300 tern prego de ^ 
microcomputador pequeno. Mas memoria i 
de microcomputador grande. 

Ele jd nasceu com 64 



Pode ser llgado 
a um televisor comum 
ou a um sotisticado 
terminal de video. 



kbytes de memoria e ainda dispor de todos 

^ interna com f os programas existentes 
y possibilidade de Permite para o CP 500 ou o 
expansao de memo- TRS-80 americano. E o que 6 melhor: 
externa para ate ’ voce estard apto a operar qualquer 

megabyte. outro sistema de microcomputador. 

clado profissional, Nenhum outro microcomputador pessoal 
jrsatilidade incrfvel. na sua faixa tern tantas possibilidades de 
i programas de expansao ou desempenho igual. 
meira que com CP 300 Prologica. 

lilHSBEZEl , Osoulrosnao ■■■ PROLOG!. 

fazem o que ele faz, ||| rracmcomputac 
ixa que ja pelo prego que 

s de memdria. ele cobra 



Pode ser ™ 
acoplado a uma 
impressora 
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Novo TK83 
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PERSONAL COMPUTER 

TK83 



O Personal Computer que 
ensinou computacao para 
mais de 2 milhoes de pessoas. 



0 sucesso do novo Microdigital TK 83 estd no suo facilidode de 
operocoo mais de 7 milh&es de pessoas em lodo o mundo 
aprenderam a resolver problemo s. montor progrqmas c veneer 
logos inteligcntes vsando este eqqipamento 

i Ele irobalha com a Linguagern Basic, a mais rdpida de aprender 
Pode ter sua memdria expondidoatd 64 K e ser hgado a uma 
Impressora eletro sensitive 

Tern uma quontidode enormq de programas d'sponiveis no 
mercado e pode tambdm ser usodo com um verdpdeiro fliperamo de 
jogo s eletronicos 

Procure ja o novo Microdigital TK 83 

E a imeioedo man complete que voce pode fazer no mundo do 
computacao. I 
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